Boucle Do Loop dans Macro Excel
Résolu
Bonjour,
J'ai déjà utilisé les macro Do Loop il y a quelques années, mais là je cale. Je ne trouve pas l'erreur...
Ci-joint un ficher pour exemple. C'est un extrait de la partie de ma macro qui me pose pb.
https://www.cjoint.com/?CDfolIu5dWa
En fait, j'ai besoin de garder l'historique de chaque onglet (dans le dossier complet, il s'agit d'un échéancier journalier).
Je souhaite pouvoir récupérer les observations qui ont été saisies manuellement le jour précédent, dans le nouvel onglet.
La colonne repère de la feuille 2 me sert de base dans la recherche, et je dois recopier l'information de la colonne OBSERVATIONS de la feuille 2, dans la colonne OBSERVATIONS de la feuille 1, toujours basée sur la colonne repère.
Pour facilité la recherche, j'ai trié la colonne repère par ordre alphabétique dans les 2 feuilles.
J'ai toujours eu du mal avec ce genre de boucle, et malgré les notes prises à l'époque je ne trouve pas.
En effet, quand je lance la macro, elle me recopie l'information de la première ligne sur toutes les lignes.
Merci d'avance pour vos lumières !
J'ai déjà utilisé les macro Do Loop il y a quelques années, mais là je cale. Je ne trouve pas l'erreur...
Ci-joint un ficher pour exemple. C'est un extrait de la partie de ma macro qui me pose pb.
https://www.cjoint.com/?CDfolIu5dWa
En fait, j'ai besoin de garder l'historique de chaque onglet (dans le dossier complet, il s'agit d'un échéancier journalier).
Je souhaite pouvoir récupérer les observations qui ont été saisies manuellement le jour précédent, dans le nouvel onglet.
La colonne repère de la feuille 2 me sert de base dans la recherche, et je dois recopier l'information de la colonne OBSERVATIONS de la feuille 2, dans la colonne OBSERVATIONS de la feuille 1, toujours basée sur la colonne repère.
Pour facilité la recherche, j'ai trié la colonne repère par ordre alphabétique dans les 2 feuilles.
J'ai toujours eu du mal avec ce genre de boucle, et malgré les notes prises à l'époque je ne trouve pas.
En effet, quand je lance la macro, elle me recopie l'information de la première ligne sur toutes les lignes.
Merci d'avance pour vos lumières !
1 réponse
-
Bon, plus nulle que moi tu meurs...
Il manquait un espace... à la fin
B = B + 1
Set Cherche = Sheets(2).Cells(B, 4)
SetIndique = Sheets(2).Cells(B, 5)
Doit être
B = B + 1
Set Cherche = Sheets(2).Cells(B, 4)
Set Indique = Sheets(2).Cells(B, 5)-
-
-
C'est où cette option ?
Depuis l'éditeur Visual Basic :
Outil - options - onglet Éditeur - cocher "Déclaration des variables obligatoires"
Cette option ajoute la ligne "Option Explicit" au début de chaque module ou code de feuille que tu crées (mais pas dans celles qui existaient déjà.
Tu n'est pas obligée de cocher cette case, "Option Explicit" est une instruction VB que tu peux très bien écrire toi même directement dans le code (mais au début) -
-
