si cellule vide

[gilm]

Bonjour,

Pour ne pas me tromper, quelqu'un pourrait-il me dire si ma formulation est correcte (bien quelle semble fonctionner) pour demander de lancer la macro1 si la cellule D2 est vide :

Sub Init_echea_recettes()
Sheets("recettes periodiques").Activate

If Range("D2") = 0 Then
Call Macro1_recettes
Else

Exit Sub

End If

End Sub

Merci beaucoup pour votre réponse.

 

[Gardien de phare]

Re : si cellule vide

Bonjour,

Si la condition est vraiment que D2 soit vide, j'utiliserais plutôt

If IsEmpty(Range("D2")) Then

 

[Staple1600]

Re : si cellule vide

Bonjour à tous


Égale à zéro et est vide sont deux choses différentes donc dans ce cas, voici ta macro modifiée en conséquence

Sub Init_echea_recettes()
'Sheets("recettes periodiques").Activate' mis en commentaire pour tester
If IsEmpty(Range("D2")) Or Range("D2") = 0 Then
Call Macro1_recettes
Else
Exit Sub
End If
End Sub

Sub Macro1_recettes()'pour tester
MsgBox "test"
End Sub

EDITION: Bonjour Gardien de Phare, pas rafraichi la page à temps, désolé pour la collision

 

[gilm]

Re : si cellule vide

Merci beaucoup pour votre réponse, ça marche très bien.
Bonne journée.

 

[gilm]

Re : si cellule vide

Merci beaucoup, bonne journée.