[VBA] Condition sur une cellule vide

Résolu/Fermé

Titi - 31 janv. 2011 à 11:48
ccm81 Messages postés 10851 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 16 avril 2024 - 31 janv. 2011 à 14:11

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

A voir également:

[VBA] Condition sur une cellule vide
Excel cellule couleur si condition texte - Guide
Aller à la ligne dans une cellule excel - Guide
Comment supprimer une page vide sur word - Guide
Formate pour taxer client frigo vide ✓ - Forum Matériel & Système
Internat nourriture - Forum Loisirs / Divertissements

2 réponses

Réponse 1 / 2

Paf
31 janv. 2011 à 11:58

Bonjour,

essaye avec:

While Boisson1 <> ""

Est ce que Boisson1 est initialisé avant la boucle?

A+

Réponse 2 / 2

ccm81 Messages postés 10851 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 16 avril 2024 2 404
Modifié par ccm81 le 31/01/2011 à 14:12

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

Discussions similaires

Comment faire le symbole coeur vide/coeur blanc

le frigo ne marche pas....

Excel : colorer une cellule sous condition d'une autre ?

Excel VBA : Derniere colonne utilisée

Excel VBA : Récupérer la valeur d'une cellule

Discussions similaires

Newsletters