Incrémenter un compteur aprés enregistrement
ticrain
Messages postés
178
Date d'inscription
jeudi 15 mars 2007
Statut
Membre
Dernière intervention
2 janvier 2015
-
7 mai 2007 à 15:13
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 - 11 mai 2007 à 11:52
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 - 11 mai 2007 à 11:52
A voir également:
- Incrémenter un compteur excel
- Compteur de caractères en ligne ✓ - Forum C# / .NET
- Arctan excel - Forum VBA Office (Excel, Word ...)
- Les fonctions " racines niemmes " et " arctan "et "arccos " et "arcsin" - Forum Visual Basic
- Creer un formulaire pdf depuis excel - Forum VB.NET
- Tangente et arctangente ✓ - Forum C++ & C++ .NET
25 réponses
ticrain
Messages postés
178
Date d'inscription
jeudi 15 mars 2007
Statut
Membre
Dernière intervention
2 janvier 2015
11 mai 2007 à 09:44
11 mai 2007 à 09:44
NICKO11 je n'ai jamais spécifié le programme ACCESS dans mes lignes je ne l'utilise pas.
ticrain
Messages postés
178
Date d'inscription
jeudi 15 mars 2007
Statut
Membre
Dernière intervention
2 janvier 2015
11 mai 2007 à 09:45
11 mai 2007 à 09:45
MA base de données est en faite un dossier avec des fichiers WORD et EXCEL à l'interieur
ticrain
Messages postés
178
Date d'inscription
jeudi 15 mars 2007
Statut
Membre
Dernière intervention
2 janvier 2015
11 mai 2007 à 09:47
11 mai 2007 à 09:47
Ton programme ne marche pas pour moi, je l'ai retapé tel quel dans mes lignes de code, tu la testé toi????
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim msg As VbMsgBoxResult
msg = MsgBox("Do you really want to save the workbook?", vbYesNo)
If msg = vbYes Then
MsgBox "Enregistrement dans la base de données"
Else
Cancel = True
End If
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim msg As VbMsgBoxResult
msg = MsgBox("Do you really want to save the workbook?", vbYesNo)
If msg = vbYes Then
MsgBox "Enregistrement dans la base de données"
Else
Cancel = True
End If
End Sub
cs_Nicko11
Messages postés
1141
Date d'inscription
mercredi 7 mars 2007
Statut
Membre
Dernière intervention
19 septembre 2007
3
11 mai 2007 à 10:11
11 mai 2007 à 10:11
"Ton programme ne marche pas pour moi", dis moi en quoi il ne fonctionne pas car ca m'aide pas.
Cet evenement se declanche a chaque fois que tu enregistres pas a la fermeture de l'application Excel. Car tu pourrait tres bien fermer Excel sans vouloir sauvegarder.
Cet evenement se declanche a chaque fois que tu enregistres pas a la fermeture de l'application Excel. Car tu pourrait tres bien fermer Excel sans vouloir sauvegarder.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
cs_MPi
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
17 août 2018
23
11 mai 2007 à 11:52
11 mai 2007 à 11:52
Salut Ticrain,
Je pense que c'est le 3e post sur le même sujet...
Commence par définir comment tu ouvres tes documents et comment tu fais les modifications
Est-ce que tu utilises Shell ou ShellExecute ?
Est-ce que tu crées une instance de Word ou Excel avec New Excel.Application ou Word.Application (New ou CreateObject ...)
Est-ce ton programme qui fais les modifications ? ou est-ce l'utilisateur qui les fait de façon indépendante de ton programme ?
MPi
Je pense que c'est le 3e post sur le même sujet...
Commence par définir comment tu ouvres tes documents et comment tu fais les modifications
Est-ce que tu utilises Shell ou ShellExecute ?
Est-ce que tu crées une instance de Word ou Excel avec New Excel.Application ou Word.Application (New ou CreateObject ...)
Est-ce ton programme qui fais les modifications ? ou est-ce l'utilisateur qui les fait de façon indépendante de ton programme ?
MPi