Testé si une cellule est vide.

[MJ13]

Bonjour

Je cherche en VBA et cela doit être simple pourtant.

Comment déterminer qu'une cellule est vide (ou savoir si il s'agit d'un texte, formule ou valeur)?

J'ai testé ceci:

if activecell.value <> "" then msgbox("ok")

 

[Cousinhub]

Re : Testé si une cellule est vide.

Bonjour
peut-être ce code :

Sub vide()
For Each cel In Range("A10:A12")
x = VarType(cel)
If IsEmpty(cel) Then MsgBox "vide"
If cel.HasFormula Then MsgBox "formule"
If IsNumeric(cel) Then MsgBox "nombre"
Next cel
End Sub

Regarde dans l'aide pour VarType

 

[MJ13]

Re : Testé si une cellule est vide.

Bonjour BHBH

Merci beaucoup.

Bon Week-end