Problème condition en VB
Résolu
Assefoug
Messages postés
13
Date d'inscription
Statut
Membre
Dernière intervention
-
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention -
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.
A voir également:
- Problème condition en VB
- Excel cellule couleur si condition texte - Guide
- Vb - Télécharger - Langages
- Vb cable - Télécharger - Audio & Musique
- Excel condition ou - Guide
- Excel soustraction avec condition ✓ - Forum Excel
4 réponses
Bonjour,
dans "programme_P2" peut-être faudrait il préciser l'onglet style sheets("nom_onglet")
difficile à dire sans connaitre ton contexte
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
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
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
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