Sujet Précédent Sujet Suivant

Boucle Do Loop dans Macro Excel

Résolu/Fermé
Snoopy6102000 Messages postés 66 Date d'inscription vendredi 11 février 2011 Statut Membre Dernière intervention 18 décembre 2013 - 5 avril 2013 à 14:16
Snoopy6102000 Messages postés 66 Date d'inscription vendredi 11 février 2011 Statut Membre Dernière intervention 18 décembre 2013 - 8 avril 2013 à 10:08
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 !

A voir également:

1 réponse

Réponse 1 / 1
Snoopy6102000 Messages postés 66 Date d'inscription vendredi 11 février 2011 Statut Membre Dernière intervention 18 décembre 2013 2
5 avril 2013 à 14:30
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)
1
Utilisateur anonyme
5 avril 2013 à 14:45
Bonjour

Si tu utilisais Option Explicit, ce genre d'erreur te serait signalé immédiatement.
0
Snoopy6102000 Messages postés 66 Date d'inscription vendredi 11 février 2011 Statut Membre Dernière intervention 18 décembre 2013 2
8 avril 2013 à 08:13
C'est où cette option?
Du coup mon exemple ici marche, mais pas dans ma macro... peut être un pb de tri? Cette option me trouverai peut être l'erreur...
0
Utilisateur anonyme
8 avril 2013 à 08:49
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)
0
Snoopy6102000 Messages postés 66 Date d'inscription vendredi 11 février 2011 Statut Membre Dernière intervention 18 décembre 2013 2
8 avril 2013 à 10:08
Merci
0

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses