Je voudrais afficher des icones dans mes boites de messages ;
Information, exclamation, stop..... (vbcritical, vbinformation,
vbexclamation.....)
C'est très facile dès qu'il n'y a pas d'If : MsgBox "contenu du message",
vbExclamation, "titre du message"
Ou placer l'info dans cette syntaxe par exemple :
******************************************************
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour ?
", vbYesNo, "Mise à Jour !") = vbNo Then
DoCmd.CancelEvent
Else:
******************************************************
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
Pierre CFI
bonjour
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour ? ", vbExclamation + vbYesNo, "Mise à Jour !") = vbNo -- Pierre CFI Microsoft MVP Access "PO2B" a écrit dans le message news:
Bonjour à tous
Je voudrais afficher des icones dans mes boites de messages ; Information, exclamation, stop..... (vbcritical, vbinformation, vbexclamation.....) C'est très facile dès qu'il n'y a pas d'If : MsgBox "contenu du message", vbExclamation, "titre du message"
Ou placer l'info dans cette syntaxe par exemple :
****************************************************** If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour ?
", vbYesNo, "Mise à Jour !") = vbNo Then DoCmd.CancelEvent Else: ******************************************************
Merci d'avance
PO
bonjour
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour ?
", vbExclamation + vbYesNo, "Mise à Jour !") = vbNo
--
Pierre CFI
Microsoft MVP Access
"PO2B" <po2b@laposte.net> a écrit dans le message news:
uFImOLLcEHA.1656@TK2MSFTNGP09.phx.gbl...
Bonjour à tous
Je voudrais afficher des icones dans mes boites de messages ;
Information, exclamation, stop..... (vbcritical, vbinformation,
vbexclamation.....)
C'est très facile dès qu'il n'y a pas d'If : MsgBox "contenu du message",
vbExclamation, "titre du message"
Ou placer l'info dans cette syntaxe par exemple :
******************************************************
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour
?
", vbYesNo, "Mise à Jour !") = vbNo Then
DoCmd.CancelEvent
Else:
******************************************************
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour ? ", vbExclamation + vbYesNo, "Mise à Jour !") = vbNo -- Pierre CFI Microsoft MVP Access "PO2B" a écrit dans le message news:
Bonjour à tous
Je voudrais afficher des icones dans mes boites de messages ; Information, exclamation, stop..... (vbcritical, vbinformation, vbexclamation.....) C'est très facile dès qu'il n'y a pas d'If : MsgBox "contenu du message", vbExclamation, "titre du message"
Ou placer l'info dans cette syntaxe par exemple :
****************************************************** If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour ?
", vbYesNo, "Mise à Jour !") = vbNo Then DoCmd.CancelEvent Else: ******************************************************
Merci d'avance
PO
PO2B
Merci Pierre, ça fonctionne
PO
"Pierre CFI" a écrit dans le message de news:
bonjour
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour ?
", vbExclamation + vbYesNo, "Mise à Jour !") = vbNo -- Pierre CFI Microsoft MVP Access "PO2B" a écrit dans le message news:
Bonjour à tous
Je voudrais afficher des icones dans mes boites de messages ; Information, exclamation, stop..... (vbcritical, vbinformation, vbexclamation.....) C'est très facile dès qu'il n'y a pas d'If : MsgBox "contenu du message",
vbExclamation, "titre du message"
Ou placer l'info dans cette syntaxe par exemple :
****************************************************** If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour
?
", vbYesNo, "Mise à Jour !") = vbNo Then DoCmd.CancelEvent Else: ******************************************************
Merci d'avance
PO
Merci Pierre, ça fonctionne
PO
"Pierre CFI" <XXX_pierresalaun@aol.com> a écrit dans le message de
news:Opue8PLcEHA.796@TK2MSFTNGP09.phx.gbl...
bonjour
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour
?
", vbExclamation + vbYesNo, "Mise à Jour !") = vbNo
--
Pierre CFI
Microsoft MVP Access
"PO2B" <po2b@laposte.net> a écrit dans le message news:
uFImOLLcEHA.1656@TK2MSFTNGP09.phx.gbl...
Bonjour à tous
Je voudrais afficher des icones dans mes boites de messages ;
Information, exclamation, stop..... (vbcritical, vbinformation,
vbexclamation.....)
C'est très facile dès qu'il n'y a pas d'If : MsgBox "contenu du
message",
vbExclamation, "titre du message"
Ou placer l'info dans cette syntaxe par exemple :
******************************************************
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à
Jour
?
", vbYesNo, "Mise à Jour !") = vbNo Then
DoCmd.CancelEvent
Else:
******************************************************
If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour ?
", vbExclamation + vbYesNo, "Mise à Jour !") = vbNo -- Pierre CFI Microsoft MVP Access "PO2B" a écrit dans le message news:
Bonjour à tous
Je voudrais afficher des icones dans mes boites de messages ; Information, exclamation, stop..... (vbcritical, vbinformation, vbexclamation.....) C'est très facile dès qu'il n'y a pas d'If : MsgBox "contenu du message",
vbExclamation, "titre du message"
Ou placer l'info dans cette syntaxe par exemple :
****************************************************** If MsgBox(" Êtes-vous certain de vouloir mettre toutes les tables à Jour
?
", vbYesNo, "Mise à Jour !") = vbNo Then DoCmd.CancelEvent Else: ******************************************************
