Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Message avec condition

2 réponses
Avatar
Manu
Bonsoir,

Comment puis-je demander à Excel de me mettre un message "Dommage" si il n'y
a que des cellules vides dans la plage A10:D40 de la Feuil Synthèse et en
revanche si au moins une cellule n'est pas vide dans la même plage mettre un
message "Bravo"

Merci

Manu


---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com

2 réponses

Avatar
Jacky
Bonsoir,

Adapte le nom de la feuille
'-----------
Sub J_J()
With Sheets("Feuil1")
MsgBox IIf(Application.CountA(.[a10:d40]), "Bravo", "Dommage")
End With
End Sub
'-----------

--
Salutations
JJ


"Manu" a écrit dans le message de news: mf41p0$qrv$
Bonsoir,

Comment puis-je demander à Excel de me mettre un message "Dommage" si il n'y a que des cellules vides dans
la plage A10:D40 de la Feuil Synthèse et en revanche si au moins une cellule n'est pas vide dans la même
plage mettre un message "Bravo"

Merci

Manu

---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com

Avatar
Manu
Tout ce que je souhaitais Jacky !!! Merci Bcp.

Manu


"Jacky" a écrit dans le message de groupe de discussion :
mf440e$1mn$

Bonsoir,

Adapte le nom de la feuille
'-----------
Sub J_J()
With Sheets("Feuil1")
MsgBox IIf(Application.CountA(.[a10:d40]), "Bravo", "Dommage")
End With
End Sub
'-----------

--
Salutations
JJ


"Manu" a écrit dans le message de news:
mf41p0$qrv$
Bonsoir,

Comment puis-je demander à Excel de me mettre un message "Dommage" si il
n'y a que des cellules vides dans la plage A10:D40 de la Feuil Synthèse et
en revanche si au moins une cellule n'est pas vide dans la même plage
mettre un message "Bravo"

Merci

Manu

---
L'absence de virus dans ce courrier électronique a été vérifiée par le
logiciel antivirus Avast.
http://www.avast.com





---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com