VBA Excel Boite de dialogue
Fermé
Fou_Du_Guidon
Messages postés
320
Date d'inscription
mardi 26 mai 2009
Statut
Membre
Dernière intervention
9 juillet 2010
-
8 juil. 2009 à 15:42
jjsteing Messages postés 1670 Date d'inscription vendredi 11 mai 2007 Statut Contributeur Dernière intervention 21 mai 2012 - 8 juil. 2009 à 21:59
jjsteing Messages postés 1670 Date d'inscription vendredi 11 mai 2007 Statut Contributeur Dernière intervention 21 mai 2012 - 8 juil. 2009 à 21:59
Bonjour,
je ne sais pas trop comment on peux appeler sa, je vais dire une boîte de dialogue.
Donc une boîte de dialogue qui s'ouvre à l'ouverture du fichier et qui demande si c'est la 1ere fois qu'on l'ouvre ou non et en fonction de la réponse exécute différente macro. Et si c'est pas la 1ere fois qu'on l'ouvre quel se place à la fin du fichier (colonne A) puis exécute une macro.
J'ai déjà fait quelque chose comme sa avec une input box mais je vois pas comment l'adapter.
Pouvez-vous m'aider?
je ne sais pas trop comment on peux appeler sa, je vais dire une boîte de dialogue.
Donc une boîte de dialogue qui s'ouvre à l'ouverture du fichier et qui demande si c'est la 1ere fois qu'on l'ouvre ou non et en fonction de la réponse exécute différente macro. Et si c'est pas la 1ere fois qu'on l'ouvre quel se place à la fin du fichier (colonne A) puis exécute une macro.
J'ai déjà fait quelque chose comme sa avec une input box mais je vois pas comment l'adapter.
Pouvez-vous m'aider?
A voir également:
- VBA Excel Boite de dialogue
- Liste déroulante excel - Guide
- Boite gmail saturée - Guide
- Se connecter à ma boite hotmail - Guide
- Si et excel - Guide
- Word et excel gratuit - Guide
2 réponses
moiced59
Messages postés
1145
Date d'inscription
samedi 15 novembre 2008
Statut
Membre
Dernière intervention
18 août 2014
60
8 juil. 2009 à 20:29
8 juil. 2009 à 20:29
il te fo creer une macro autoexec au demarrage qui :
dim saisie as string
saisie= inputbox("est ce la premiere fois que vous interoger la base? oui ou non")
if saisie = "oui" then
docmd.runmacro "nom_macro"
else
DoCmd.GoToRecord , , acNewRec
voila j espere t avoir aide
dim saisie as string
saisie= inputbox("est ce la premiere fois que vous interoger la base? oui ou non")
if saisie = "oui" then
docmd.runmacro "nom_macro"
else
DoCmd.GoToRecord , , acNewRec
voila j espere t avoir aide
jjsteing
Messages postés
1670
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
8 juil. 2009 à 21:59
8 juil. 2009 à 21:59
ou avec
if msgbox ("premiere ouverture",vbYesNo + vbQuestion ) =vbyes then
...
else
....
end if
;)
if msgbox ("premiere ouverture",vbYesNo + vbQuestion ) =vbyes then
...
else
....
end if
;)