Je voudrais par macro sélectionner toutes les lignes répondant à
mylord6666
Messages postés
62
Statut
Membre
-
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
je n'arrive pas réaliser par macro cette selection voici ma macro elle plante mon excel
sub JeSelectionne()
i = 1
NombreLignes = 20
While i If Cells(i, 1) = MonCritere Then
MesLignes = MesLignes & i & ":" & i & ","
End If
i = i + 1
Wend
MesLignes = Left(MesLignes, Len(MesLignes) - 1)
Sheets("Feuil1").Range(MesLignes).Select
end sub
je n'arrive pas réaliser par macro cette selection voici ma macro elle plante mon excel
sub JeSelectionne()
i = 1
NombreLignes = 20
While i If Cells(i, 1) = MonCritere Then
MesLignes = MesLignes & i & ":" & i & ","
End If
i = i + 1
Wend
MesLignes = Left(MesLignes, Len(MesLignes) - 1)
Sheets("Feuil1").Range(MesLignes).Select
end sub
2 réponses
-
Bonjour,
While i If Cells(i, 1) = MonCritere Then ne veut rien dire.
On a besoin de connaitre Cells(i, 1) et MonCritere.
Explique ce que tu veux comme boucle, joindre un fichier est mieux, pour toi comme pour nous.
cjoint.com et coller ici le lien fourni.
eric
-
Bonjour,
Tu n'as pas un message d'erreur ou quelque chose qui dit que ça ne fonctionne pas ?
