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
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
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
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" <manuinf60@gmail.com> a écrit dans le message de news: mf41p0$qrv$1@speranza.aioe.org...
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
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
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
Tout ce que je souhaitais Jacky !!! Merci Bcp.
Manu
"Jacky" a écrit dans le message de groupe de discussion :
mf440e$1mn$1@speranza.aioe.org...
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" <manuinf60@gmail.com> a écrit dans le message de news:
mf41p0$qrv$1@speranza.aioe.org...
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
"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
