Recherche des éléments d'une table

Créer une discussion
Répondre

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
marmotte18

marmotte18

XLDnaute Impliqué
Bonjour,

Je vous transmets un fichier Excel comportant 2 onglets :
  • Base (contenu de la base de données. Il pourrait y avoir plusieurs dizaine de milliers d'enregistrements. Je n'en ai mis que 10)
  • Recherche (le gestionnaire doit saisir un Num en C1)
Le fichier est destiné à plusieurs dizaines d'employés. la démarche doit être faite sans macro.

Résultats attendus :

Si le N° saisi "Num" n'appartient pas à la base "Tab", le tableau résultats se trouvant dans l'onglet "Recherche" doit être vide.

Si le N° saisi appartient à la base, toutes les lignes correspondantes doivent être ramenées dans l'onglet recherche.

Problématique :


Ma solution fonctionne très bien mais je me demande si on peut améliorer la méthode :
  • Peut-on se passer du N° de ligne que j'ai rajouté dans Tab ?
  • Peut-on se passer du N° de ligne que j'ai rajouté dans la table des résultats ?
  • Existe-t-il des formules plus consises pour arriver au résultat ?
Il faut souligner que dans les faits, le tableau de résultats pourrait avoir au maximum une centaine de lignes et que la base pourrait contenir une trentaine de colonnes.

Merci par avance à ceux qui se pencheront sur mes interrogations.
 

Pièces jointes

Dernière édition:
Trier par date Trier par votes
Re : Recherche des éléments d'une table

Bonjour,

Essaye avec cette formule matricielle :

en A4 :

Code: 
=SI(NB.SI(Base!$A$2:$A$200;Num)<LIGNE()-3;"";INDEX(Base!$[COLOR=red][B]A[/B][/COLOR]$1:$[B][COLOR=red]A[/COLOR][/B]$200;
PETITE.VALEUR(SI((Base!$A$2:$A$200=Num)*(LIGNE(INDIRECT("2:200")))<>0;
(Base!$A$2:$A$200=Num)*(LIGNE(INDIRECT("2:200"))));LIGNE()-3)))

Formule à valider par CTRL + MAJ + ENTREE

et à recopier vers le bas

Pour les colonnes suivantes, adapte la colonne au niveau de INDEX. le A devient C pour la colonne Trim, etc.

@+
 
Vote positif 0 Vote négatif
Re : Recherche des éléments d'une table

Bonsoir,

Avec le filtre élaboré

Voir PJ

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
    Sheets("Base").Range("A1:E1000").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Range("C1:C2"), CopyToRange:=Range("A3:D3")
End Sub

JB
Formation Excel VBA JB
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : Recherche des éléments d'une table

Bonsoir marmotte18,Tibo,BOISGONTIER
Bonsoir le forum

Suite à la lecture de votre fichier, j'ai le plaisir de vous proposer la solution de votre probléme sur le fichier ci-joint.

Essaye de le consulter , s'il convient à la solution de votre probléme.

Bcharef
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Recherche des éléments d'une table

Bonsoir BOISGONTIER,

J'avais demandé sans macro mais j'ai quand même eu la curiosité de regarder.

C'est très consis ! BRAVO !

J'ai essayé de l'adapter à plus de colonnes (A à H de l'onglet "Base") et bêtement je n'y suis pas arrivé. Cela me donne toujours les mêmes résultats.

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
 
'Déprotection de la feuille
'------------------------
    ActiveSheet.Unprotect
 
'Recherche des enregistrements correspondant au N° saisi
'-------------------------------------------------------
    Sheets("Base").Range("A1:H65536").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Range("C1:C2"), CopyToRange:=Range("A3:H3")
 
'Protection de la feuille
'------------------------
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFiltering:=True
    Range("C2").Select
End Sub

Que dois-je modifier pour obtenir ce 2ème objectif ?
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Recherche des éléments d'une table

Bonsoir bcharef,

Une proposition par tableau croisé dynamique ! BRAVO !

Peut-on utiliser cette faculté sur une autre page que celle de la base de données ?

Qu'advient-il si j'ai plusieurs dizaines de milliers de N° différents ? N'y a-t-il pas une limite d'affichage dans la liste déroulante qui me propose les valeurs ?

Merci également de tout ce mal que tu te donnes pour moi.
 
Vote positif 0 Vote négatif
Re : Recherche des éléments d'une table

Rebonsoir marmotte18;
Rebonsoir le forum.

A l'occasion de ce fil, j'ai le grand plaisir de passer le grand bonjour à BOISGONTIER "JB" .

Peut-on utiliser cette faculté sur une autre page que celle de la base de données ?

Oui, vous avez la faculté d'utiliser une autre feuille nommée "TCD" distinctement de la base de donnée .

Qu'advient-il si j'ai plusieurs dizaines de milliers de N° différents ? N'y a-t-il pas une limite d'affichage dans la liste déroulante qui me propose les valeurs ?

Voilà, j'ai automatisé l'actualisation du TCD par une petite macro, ainsi que la plage de vos données par la fonction décaler .

La limite est conditionnée par le nombre de lignes et de colonne de la feuille en elle même.

Comme, il est utile de porter à votre connaissance d'enregistrer les dates au lieu de "exercice", "trimestre", car, tout simplement le TCD peut les gérer lui même.

Je vous joins le fichier, j'espére bien que ça vous convient.

A+
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Recherche des éléments d'une table

Bonsoir tout le monde,

BOISGONTIER :

Merci pour ton nouveau fichier.

Je cherche en fait à adapter ton exemple pour qu'à chaque N° saisi cela ramène toutes les informations figurant dans les colonnes B à H correspondant à ce N° et pas seulement les informations des colonnes B à D.

Peux-tu me dire où faut-il que je fasse les modifications pour obtenir ce résultat ? Je n'y arrive pas !
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Recherche des éléments d'une table

Bonsoir tout le monde,

bcharef :

Merci pour votre nouvelle mouture ! Le principe est intéressant. Néanmoins, j'ai quand même des craintes quant aux limitations d'affichage des N° proposés dans la liste déroulante.

Mais je garde précieusement votre méthode sous le coude afin de la mettre en présence du fichier réel quand je l'aurai à disposition.

C'est sympa de votre part de m'avoir consacré du temps !
 
Vote positif 0 Vote négatif
Re : Recherche des éléments d'une table

Bonsoir tout le monde,

Merci BOISGONTIER pour ton dernier fichier. Cela marche super bien !

Les propositions des autres internautes marchent bien aussi d'alleurs. J'en profite pour remercier à nouveau bcharef et Tibo.

=> Je considère le sujet clos !
 
Vote positif 0 Vote négatif
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

R
  • Question Question
Microsoft 365 aide recherche multiple entrées d'une cellule dans colonne
2
Réponses
16
Affichages
835
richard31
R
V
  • Résolu(e)
Microsoft 365 Barre de recherche : comment rendre éditable le résultat ?
2 3 4
Réponses
52
Affichages
947
dysorthographie
dysorthographie
O
  • Question Question
XL 2013 Planification automatique des rdv d'intervention en fonction des dates disponibles
Réponses
3
Affichages
297
cathodique
cathodique
M
  • Question Question
XL 2021 Fichier de suivi avec liens et formules
Réponses
4
Affichages
260
Mily74
M
V
  • Question Question
Microsoft 365 Je ne sais plus ou j'en suis....
3 4 5
Réponses
62
Affichages
2 K
ValDorier
V
I
  • Question Question
XL pour MAC Xlsm - Fichier permettant de gérer un cross d'établissement scolaire
Réponses
8
Affichages
502
iruri
I
MBax
  • Résolu(e)
Microsoft 365 Extraction d'informations sur différents onglets en partant d'une base de données
Réponses
7
Affichages
636
MBax
MBax
Calvus
  • Question Question
Microsoft 365 Recherche incomplète planning (problème de dates)
Réponses
13
Affichages
423
p56
p56
P
  • Question Question
XL 2016 identifier chaine de caractère dans une cellule et ramener une donnée d'une table de correspondance
Réponses
5
Affichages
633
pmid20
P
L
  • Résolu(e)
Microsoft 365 Ratio dans un TCD
Réponses
4
Affichages
406
Laurent78
L
N
  • Résolu(e)
Microsoft 365 Recherche dans un tableau structuré à partir d'une TextBox
Réponses
11
Affichages
593
NONO14
N
anthoYS
  • Résolu(e)
Microsoft 365 Programme de lecture d'un très gros livre (3 différents livres par semaine et un chapitre de chaque par jour)
2
Réponses
18
Affichages
844
crocrocro
C
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
330
Phil69970
Phil69970
C
  • Résolu(e)
XL 2019 Recherchev avec même valeur
Réponses
5
Affichages
277
job75
job75
p'tit vieux
  • Question Question
XL 2021 VBA: Extraction des paramètres d'une formule (texte)
2
Réponses
28
Affichages
2 K
p'tit vieux
p'tit vieux
N
  • Résolu(e)
Microsoft 365 Rechercher la dernière cellule saisie dans un TS et ajouter l'heure système
18 19 20
Réponses
297
Affichages
69 K
NONO14
N
A
  • Question Question
XL 2021 Générer des données à partir d'une ligne spécifique jusqu'à une autre
Réponses
5
Affichages
497
gbinforme
G
oguruma
POWERQUERY :: Attribuer un type de données à tout ou partie des colonnes d'une table
Réponses
0
Affichages
395
oguruma
oguruma
O
  • Question Question
XL 2016 Compter des cellules dont les données sont consécutives
Réponses
9
Affichages
1 K
piga25
piga25
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
683
Nel'
N
Retour