Comment Automatiser Les fonctions INDEX+ EQUIV VBA

MMS · 20 Novembre 2013

Bonjour A Tous! j'espère fortement trouver une solution, car cela fais déjà des mois que je rame,😕 sans solution...
Donc mon Problème est le suivant; j'ai un fichier excel qui contient 3 colonnes (categorie;references;conso) qui est mise à jour quotidiennement dans le même classeur sur des feuil différentes,c'est à dire; chaque jour est classé dans une nouvelle feuille soit 31 feuil par mois; il faut chaque mois regrouper toutes ces feuil dans une unique feuil Nommé "RENDU".j'y suis parvenu par INDEX + EQUIV sauf que, a chaque fois je dois saisir cette formule sur 31 colonnes tout les mois. y'aurait-il pas un moyen par VBA d'automatiser ce tracking???
j'ai peur de n’être explicite, j'espère que le fichier joint vous aidera a mieux comprendre.

Merci d'avance pour votre Disponibilité
Cdt,

R@chid · 20 Novembre 2013

Re : Comment Automatiser Les fonctions INDEX+ EQUIV VBA

Bonjour et Bienvenu sur XLD,
en B5,

Code:

=SIERREUR(RECHERCHEV($A5;INDIRECT("'"&B$4&"'!B:C");2;0);"")

@ tirer vers le bas et vers la droite
@ + +

MMS · 20 Novembre 2013

Re : Comment Automatiser Les fonctions INDEX+ EQUIV VBA

Bonjour, merci pour votre promptitude 😱 ; mais en fait , je voudrais, plus orienter la solution a mon probleme vers VBA, de tel sorte que je n'aurais a saisir le code qu'une fois pour toutes... serait ce possible? je tiens a préciser que le classeur qui contient la feuille RENDU est différente de celle du classeur d'où proviennent les données.merci

MMS · 22 Novembre 2013

Re : Comment Automatiser Les fonctions INDEX+ EQUIV VBA

Bonjour R@chid ,
en admettant que la valeur recherche est dans un autre classeur comment réécrire cette formule???
avec recherche V et indirect

R@chid · 22 Novembre 2013

Re : Comment Automatiser Les fonctions INDEX+ EQUIV VBA

Bonjour,

Code:

=SIERREUR(RECHERCHEV($A5;INDIRECT("[tacking.xlsx]"&B$4&"!B:C");2;0);"")

@ + +

cathodique · 22 Novembre 2013

Re : Comment Automatiser Les fonctions INDEX+ EQUIV VBA

Bonsoir,

Je ne suis pas très fort en VBA. mais pour avoir les formules en VBA, moi je démarre l'enregistrement d'une macro, je sélectionne la cellule qui contient la formule et dans la barre de formules je la sélectionne et je fait un copier (Ctrl+V). j’arrête l'enregistrement de la macro. j'ai ainsi ma formule en vba.
voici ce que j'ai obtenu, la formule est en A1

Code:

Range("A1").Select
    ActiveCell.FormulaR1C1 = _
        "=IFERROR(VLOOKUP(R[4]C1,INDIRECT(""[tacking.xlsx]""&R4C[1]&""!B:C""),2,0),"""")"

cordialement,

MMS · 24 Novembre 2013

Re : Comment Automatiser Les fonctions INDEX+ EQUIV VBA

merci j'ai testé et c bon pour moi !!!

MMS · 24 Novembre 2013

Re : Comment Automatiser Les fonctions INDEX+ EQUIV VBA

Jolie méthode cathodique,,,
merci

Comment Automatiser Les fonctions INDEX+ EQUIV VBA

MMS

XLDnaute Nouveau

Pièces jointes

R@chid

XLDnaute Barbatruc

MMS

XLDnaute Nouveau

MMS

XLDnaute Nouveau

R@chid

XLDnaute Barbatruc

cathodique

XLDnaute Barbatruc

MMS

XLDnaute Nouveau

MMS

XLDnaute Nouveau

Discussions similaires

Comment Automatiser Les fonctions INDEX+ EQUIV VBA

XLDnaute Nouveau

Pièces jointes

XLDnaute Barbatruc

XLDnaute Nouveau

XLDnaute Nouveau

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Nouveau

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency