Dans "Private Sub WorkBook_BeforeClose(Cancel As Boolean)",
j'ai un message qui s'affiche (ie) "Macros inactives ..."
Pb, le message s'affiche trop tôt !
En effet, si j'appuis sur "Annuler" (lorsqu'Excel demande si on veut
enregistrer, etc.), mon msg reste en place !
Est-il possible de modifier le contenu d'une cellule à l'extrême
fermeture ? J'ai essayé avec un "Application.ScreeUpDating = False",
mais ça ne change rien.
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
isabelle
bonjour Jp,
Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets("Feuil1").Range("A1") = Now ActiveWorkbook.Close SaveChanges:=True End Sub
isabelle
j-pascal a écrit :
Bonsoir,
Dans "Private Sub WorkBook_BeforeClose(Cancel As Boolean)",
j'ai un message qui s'affiche (ie) "Macros inactives ..."
Pb, le message s'affiche trop tôt !
En effet, si j'appuis sur "Annuler" (lorsqu'Excel demande si on veut enregistrer, etc.), mon msg reste en place !
Est-il possible de modifier le contenu d'une cellule à l'extrême fermeture ? J'ai essayé avec un "Application.ScreeUpDating = False", mais ça ne change rien.
Merci pour vos lumières,
jp
bonjour Jp,
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Feuil1").Range("A1") = Now
ActiveWorkbook.Close SaveChanges:=True
End Sub
isabelle
j-pascal a écrit :
Bonsoir,
Dans "Private Sub WorkBook_BeforeClose(Cancel As Boolean)",
j'ai un message qui s'affiche (ie) "Macros inactives ..."
Pb, le message s'affiche trop tôt !
En effet, si j'appuis sur "Annuler" (lorsqu'Excel demande si on veut
enregistrer, etc.), mon msg reste en place !
Est-il possible de modifier le contenu d'une cellule à l'extrême
fermeture ? J'ai essayé avec un "Application.ScreeUpDating = False",
mais ça ne change rien.
Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets("Feuil1").Range("A1") = Now ActiveWorkbook.Close SaveChanges:=True End Sub
isabelle
j-pascal a écrit :
Bonsoir,
Dans "Private Sub WorkBook_BeforeClose(Cancel As Boolean)",
j'ai un message qui s'affiche (ie) "Macros inactives ..."
Pb, le message s'affiche trop tôt !
En effet, si j'appuis sur "Annuler" (lorsqu'Excel demande si on veut enregistrer, etc.), mon msg reste en place !
Est-il possible de modifier le contenu d'une cellule à l'extrême fermeture ? J'ai essayé avec un "Application.ScreeUpDating = False", mais ça ne change rien.
Merci pour vos lumières,
jp
j-pascal
Bonsoir Isabelle,
Et merci !
jp
bonjour Jp,
Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets("Feuil1").Range("A1") = Now ActiveWorkbook.Close SaveChanges:=True End Sub
isabelle
j-pascal a écrit :
Bonsoir,
Dans "Private Sub WorkBook_BeforeClose(Cancel As Boolean)",
j'ai un message qui s'affiche (ie) "Macros inactives ..."
Pb, le message s'affiche trop tôt !
En effet, si j'appuis sur "Annuler" (lorsqu'Excel demande si on veut enregistrer, etc.), mon msg reste en place !
Est-il possible de modifier le contenu d'une cellule à l'extrême fermeture ? J'ai essayé avec un "Application.ScreeUpDating = False", mais ça ne change rien.
Merci pour vos lumières,
jp
Bonsoir Isabelle,
Et merci !
jp
bonjour Jp,
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Feuil1").Range("A1") = Now
ActiveWorkbook.Close SaveChanges:=True
End Sub
isabelle
j-pascal a écrit :
Bonsoir,
Dans "Private Sub WorkBook_BeforeClose(Cancel As Boolean)",
j'ai un message qui s'affiche (ie) "Macros inactives ..."
Pb, le message s'affiche trop tôt !
En effet, si j'appuis sur "Annuler" (lorsqu'Excel demande si on veut
enregistrer, etc.), mon msg reste en place !
Est-il possible de modifier le contenu d'une cellule à l'extrême fermeture
? J'ai essayé avec un "Application.ScreeUpDating = False", mais ça ne
change rien.
Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets("Feuil1").Range("A1") = Now ActiveWorkbook.Close SaveChanges:=True End Sub
isabelle
j-pascal a écrit :
Bonsoir,
Dans "Private Sub WorkBook_BeforeClose(Cancel As Boolean)",
j'ai un message qui s'affiche (ie) "Macros inactives ..."
Pb, le message s'affiche trop tôt !
En effet, si j'appuis sur "Annuler" (lorsqu'Excel demande si on veut enregistrer, etc.), mon msg reste en place !
Est-il possible de modifier le contenu d'une cellule à l'extrême fermeture ? J'ai essayé avec un "Application.ScreeUpDating = False", mais ça ne change rien.