Problème condition en VB

Résolu/Fermé
Assefoug Messages postés 13 Date d'inscription vendredi 28 mai 2010 Statut Membre Dernière intervention 7 juin 2010 - 28 mai 2010 à 09:11
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 28 mai 2010 à 10:53
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.
A voir également:

4 réponses

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
28 mai 2010 à 09:29
Bonjour,

dans "programme_P2" peut-être faudrait il préciser l'onglet style sheets("nom_onglet")

difficile à dire sans connaitre ton contexte
0
Assefoug Messages postés 13 Date d'inscription vendredi 28 mai 2010 Statut Membre Dernière intervention 7 juin 2010
28 mai 2010 à 09:41
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
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
28 mai 2010 à 10:53
en lisant ton code "Programme_P2.xls" est un classeur et non une feuille....
idem pour travail1.xls...

Ce que je te disais était de préciser le nom de l'onglet(de la feuille)
0
blux Messages postés 26475 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 16 novembre 2024 3 316
28 mai 2010 à 09:50
Salut,

y'a pas un blanc en premier ?

Essaye avec un instr() pour voir...
0
Assefoug Messages postés 13 Date d'inscription vendredi 28 mai 2010 Statut Membre Dernière intervention 7 juin 2010
28 mai 2010 à 09:57
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
0
blux Messages postés 26475 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 16 novembre 2024 3 316
28 mai 2010 à 10:09
Tu dis : il ne rentre pas dans cette maudit boucle.
C'est dans la boucle qu'il ne rentre pas ou dans le if ?

Parce que si c'est dans la boucle, c'est normal, le <> OR <> ne marchera jamais, il faut mettre un <> AND <>, c'est un classique...
0
Assefoug Messages postés 13 Date d'inscription vendredi 28 mai 2010 Statut Membre Dernière intervention 7 juin 2010
28 mai 2010 à 10:12
Sa ne venait même pas de sa , sa venait seulement du fait que mes Incrémentation pour i et J etait dans le If au lieu d'etre en dehors , et vu que ma premiere instruction ne possédait pas IY , sa ne rentrait jamais ....

Mais merci du coup de main
Assefoug .
0