Problème condition en VB
Résolu
Bonjour,
Je suis actuellement sur un projet, pour mon stage de BTS première Année, et j'ai un petit prblème avec mon code.
Je veu lui faire recopier les lignes d'une feuille dans une autre feuille ( Jusqu'ici , aucun problème), mais Seulement les Ligne ou Apparaisse dans une colonne , IY, BO et TY en debut de valeur ...
J'espère que j'ai été clair..
Voila un bout de mon code , le problème c'est qu'il ne rentre jamais dans le If, alors qu'une valeur possède IY au debut ...
Do While Cells(i, 2) <> "" Or Cells(i, 5) <> ""
Windows("Programme_P2.xls").Activate
Cells(i, 12).Select
If Left(Cells(i, 12), 2) = "IY" Then
Cells(i, 2).Select
Selection.Copy
Windows("Travail1.xls").Activate
Cells(j, 2).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End if
i = i + 1
j = j + 1
Loop
Merci d'avance ,
Assefoug.
Je suis actuellement sur un projet, pour mon stage de BTS première Année, et j'ai un petit prblème avec mon code.
Je veu lui faire recopier les lignes d'une feuille dans une autre feuille ( Jusqu'ici , aucun problème), mais Seulement les Ligne ou Apparaisse dans une colonne , IY, BO et TY en debut de valeur ...
J'espère que j'ai été clair..
Voila un bout de mon code , le problème c'est qu'il ne rentre jamais dans le If, alors qu'une valeur possède IY au debut ...
Do While Cells(i, 2) <> "" Or Cells(i, 5) <> ""
Windows("Programme_P2.xls").Activate
Cells(i, 12).Select
If Left(Cells(i, 12), 2) = "IY" Then
Cells(i, 2).Select
Selection.Copy
Windows("Travail1.xls").Activate
Cells(j, 2).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End if
i = i + 1
j = j + 1
Loop
Merci d'avance ,
Assefoug.
4 réponses
-
ContributeurBonjour,
dans "programme_P2" peut-être faudrait il préciser l'onglet style sheets("nom_onglet")
difficile à dire sans connaitre ton contexte
-
Bonjour,
Je doit recopier les donné 'une feuille (Programme_P2) dans une autre (Travail1) , mais seulement les lignes ou dans al colonne 12 apparait IY
Merci de ton aide
Assefoug -
ModérateurSalut,
y'a pas un blanc en premier ?
Essaye avec un instr() pour voir...
-
Salut,
Il n'y a aucun blanc au début :/
Le code est Correcte mais seulement, il ne rentre pas dans cette maudit boucle.
Merci de ton aide
Assefoug
