quelqu'un ou quelqu'une pourrait-il me dire comment faire apparaitre une
boite de message à l'ouverture d'un classeur suivant une condition ?
condition : un mois donné correspond au moi en cours
message : veuillez faire la mise à jour de votre plan
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
Bonjour Petit lou
Dans ThisWorkbook (Clique droit sur l'onglet de la feuille sélectionne ThisWorkbook) Copie ce code '----------- Private Sub Workbook_Open() mois = 3 '*3=pour le mois de mars *A Adapter** If Month(Now) = mois Then MsgBox "Veuillez faire la mise à jour de votre plan" End Sub '----------- Salutations JJ
"p'titlou" a écrit dans le message news: OUFEede$
Bonjour à tous,
quelqu'un ou quelqu'une pourrait-il me dire comment faire apparaitre une boite de message à l'ouverture d'un classeur suivant une condition ? condition : un mois donné correspond au moi en cours message : veuillez faire la mise à jour de votre plan
Merci bcp
-- Tu demandais dans ton message, ...
Bonjour Petit lou
Dans ThisWorkbook (Clique droit sur l'onglet de la feuille sélectionne
ThisWorkbook)
Copie ce code
'-----------
Private Sub Workbook_Open()
mois = 3 '*3=pour le mois de mars *A Adapter**
If Month(Now) = mois Then MsgBox "Veuillez faire la mise à jour de votre
plan"
End Sub
'-----------
Salutations
JJ
"p'titlou" <lludvic@yahoo.fr> a écrit dans le message news:
OUFEede$DHA.688@tk2msftngp13.phx.gbl...
Bonjour à tous,
quelqu'un ou quelqu'une pourrait-il me dire comment faire apparaitre une
boite de message à l'ouverture d'un classeur suivant une condition ?
condition : un mois donné correspond au moi en cours
message : veuillez faire la mise à jour de votre plan
Dans ThisWorkbook (Clique droit sur l'onglet de la feuille sélectionne ThisWorkbook) Copie ce code '----------- Private Sub Workbook_Open() mois = 3 '*3=pour le mois de mars *A Adapter** If Month(Now) = mois Then MsgBox "Veuillez faire la mise à jour de votre plan" End Sub '----------- Salutations JJ
"p'titlou" a écrit dans le message news: OUFEede$
Bonjour à tous,
quelqu'un ou quelqu'une pourrait-il me dire comment faire apparaitre une boite de message à l'ouverture d'un classeur suivant une condition ? condition : un mois donné correspond au moi en cours message : veuillez faire la mise à jour de votre plan
Merci bcp
-- Tu demandais dans ton message, ...
p'titlou
Merci bcp ca marche très bien, faut juste penser à baisser les sécurités
"Jacky" a écrit dans le message de news: eK#q7me$
Bonjour Petit lou
Dans ThisWorkbook (Clique droit sur l'onglet de la feuille sélectionne ThisWorkbook) Copie ce code '----------- Private Sub Workbook_Open() mois = 3 '*3=pour le mois de mars *A Adapter** If Month(Now) = mois Then MsgBox "Veuillez faire la mise à jour de votre plan" End Sub '----------- Salutations JJ
"p'titlou" a écrit dans le message news: OUFEede$
Bonjour à tous,
quelqu'un ou quelqu'une pourrait-il me dire comment faire apparaitre une boite de message à l'ouverture d'un classeur suivant une condition ? condition : un mois donné correspond au moi en cours message : veuillez faire la mise à jour de votre plan
Merci bcp
-- Tu demandais dans ton message, ...
Merci bcp ca marche très bien,
faut juste penser à baisser les sécurités
"Jacky" <Jackyenlevez.jaeg@wanadoo.fr> a écrit dans le message de news:
eK#q7me$DHA.2664@TK2MSFTNGP09.phx.gbl...
Bonjour Petit lou
Dans ThisWorkbook (Clique droit sur l'onglet de la feuille sélectionne
ThisWorkbook)
Copie ce code
'-----------
Private Sub Workbook_Open()
mois = 3 '*3=pour le mois de mars *A Adapter**
If Month(Now) = mois Then MsgBox "Veuillez faire la mise à jour de votre
plan"
End Sub
'-----------
Salutations
JJ
"p'titlou" <lludvic@yahoo.fr> a écrit dans le message news:
OUFEede$DHA.688@tk2msftngp13.phx.gbl...
Bonjour à tous,
quelqu'un ou quelqu'une pourrait-il me dire comment faire apparaitre une
boite de message à l'ouverture d'un classeur suivant une condition ?
condition : un mois donné correspond au moi en cours
message : veuillez faire la mise à jour de votre plan
Merci bcp ca marche très bien, faut juste penser à baisser les sécurités
"Jacky" a écrit dans le message de news: eK#q7me$
Bonjour Petit lou
Dans ThisWorkbook (Clique droit sur l'onglet de la feuille sélectionne ThisWorkbook) Copie ce code '----------- Private Sub Workbook_Open() mois = 3 '*3=pour le mois de mars *A Adapter** If Month(Now) = mois Then MsgBox "Veuillez faire la mise à jour de votre plan" End Sub '----------- Salutations JJ
"p'titlou" a écrit dans le message news: OUFEede$
Bonjour à tous,
quelqu'un ou quelqu'une pourrait-il me dire comment faire apparaitre une boite de message à l'ouverture d'un classeur suivant une condition ? condition : un mois donné correspond au moi en cours message : veuillez faire la mise à jour de votre plan
