[VBA] Condition sur une cellule vide [Résolu/Fermé]

Signaler
-
Messages postés
9673
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
19 février 2021
-
Bonjour,


J'ai un souci, voici mon code J'aimerai que ce qu'il y a dans la boucle ne s'exécute que si Boisson1 n'est pas vide. Pourtant lorsque j'exécute mon code étape par étape lorsque Boisson1 ="" les commandes s'exécutent quand même, et je comprends pas pourquoi ......

While IsEmpty(Boisson1) <> True

Boisson1 = Cells(l + m, 3).Text
ValBoisson1 = Cells(l + m, 9).Value
m = m + 1
Sheets("Budget Initial").Cells(l + m, 2) = Boisson1
Sheets("Budget Initial").Cells(l + m, 3) = ValBoisson1
Wend



Quelqu'un peut il m'aider ???

Merci beaucoup

2 réponses

Bonjour,

essaye avec:

While Boisson1 <> ""

Est ce que Boisson1 est initialisé avant la boucle?

A+
Messages postés
9673
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
19 février 2021
2 040
bonjour

Boisson1 est recalcule après le while, d'où le pb soulevé
quelque chose comme ça devrait aller

do 
  Boisson1 = Cells(l + m, 3).Text 
  if Boisson1 <> "" then 
    ValBoisson1 = Cells(l + m, 9).Value 
    m = m + 1 
    Sheets("Budget Initial").Cells(l + m, 2) = Boisson1 
    Sheets("Budget Initial").Cells(l + m, 3) = ValBoisson1 
  end if 
loop while Boisson1 <> ""

bonne suite