Discussion :

[thierry_b]

Bonjour,

A un moment dans mon code, j'ai besoin d'efectuer un traitement sur une cellule que si celle-ci est vide et ne contient pas de blancs.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Not (IsEmpty(celluleCurrentDate) Or celluleCurrentDate.Value = "") Then
           ....
End If

mais il me met une erreur : "Objet requis".

Comment l'écrire correctement?

Merci :-)

[Krovax]

Ca serait bien que tu nous donne également la définition de

celluleCurrentDate

sinon pour ton test je dirais que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

IsEmpty(celluleCurrentDate)

est équivalent à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

celluleCurrentDate= ""

un blanc c'est " "

[casefayere]

Bonjour Krovax, Thierry, re le forum,

et j'ajouterai, le titre demande de vérifier plusieurs cellules mais le commentaire laisse penser qu'il n'y a qu'une cellule à vérifier,

Pour plusieurs cellules, passer par une boucle

[thierry_b]

Re,

En fait, celluleCurrentDate correspond à feuille1.Cells(x,y), et effectivement dans ce cas, celluleCurrentDate = " " marche pour vérifier que la cellule contient un blanc.

Je vous remercie :-)

[DeaD78]

Salut à tous,

sinon pour ton test je dirais que
Code :

IsEmpty(celluleCurrentDate)

est équivalent à
Code :

celluleCurrentDate= ""

Es-tu sûr de cela Krovax ? Je ne suis pas totalement convaincu.

[Krovax]

Je viens de tester

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox "Isempty : " & IsEmpty(Selection) & Chr(13) & "="""" : " & (Selection = "")

Avec tout ce que j'ai pus imaginer comme cellule vide, et les deux me donne toujours le même résultats. Je ne me prononcerais pas au delà (et hop je suis couvert )