Code macro nombre valeur

[gourdin]

Bonjour,

Je souhaite le code macro suivant :

Si le nombre de valeurs de la plage A1:A8 est vide alors etc..

Merci

 

[laetitia90]

Re : Code macro nombre valeur

bonjour gourdin
"brute"sans plus d'infos code dans ce style aprés on peut simplifier

Dim x As Byte
x = Application.CountIf([a1:a8], "")
If x = 8 Then MsgBox "aa" Else MsgBox "bb"

 

[gourdin]

Re : Code macro nombre valeur

Merci,

pour "caser" le code dans ma macro initiale plus complexe, je t'avouerai que je préférerai un code du type :

If Nbreval(A1:A8) = 0 Then
Etc..
End If

Merci

 

[JNP]

Re : Code macro nombre valeur

Bonjour le fil

If Application.WorksheetFunction.CountA(Range("A1:A8")) = 0 Then

Bonne journée

 

[gourdin]

Re : Code macro nombre valeur

Merci
Bonne journée