OVH Cloud OVH Cloud

message sauvegarde "enregistrer les modifications"

6 réponses
Avatar
bibi
bonjour
Un fichier en lecture seule est mis =E0 disposition
d'utilisateurs sur un r=E9seau local
Peut-on =E9viter le message "voulez vous apporter les=20
modifications" =E0 la fermeture du fichier?

6 réponses

Avatar
Michel HOLDERITH
Salut,
Application.DisplayAlerts = False
@+
Michel.

"bibi" wrote in message
news:0a2101c3a538$369fcda0$
bonjour
Un fichier en lecture seule est mis à disposition
d'utilisateurs sur un réseau local
Peut-on éviter le message "voulez vous apporter les
modifications" à la fermeture du fichier?
Avatar
bibi
désolé mais tres novice je fais quoi de cette formule?
-----Message d'origine-----
Salut,
Application.DisplayAlerts = False
@+
Michel.

"bibi" wrote in
message

news:0a2101c3a538$369fcda0$
bonjour
Un fichier en lecture seule est mis à disposition
d'utilisateurs sur un réseau local
Peut-on éviter le message "voulez vous apporter les
modifications" à la fermeture du fichier?


.



Avatar
Michel HOLDERITH
que veux-tu faire enregistre puis fermer ou fermer sans enregistre ?

"bibi" wrote in message
news:0c7301c3a540$6c1129e0$
désolé mais tres novice je fais quoi de cette formule?
-----Message d'origine-----
Salut,
Application.DisplayAlerts = False
@+
Michel.

"bibi" wrote in
message

news:0a2101c3a538$369fcda0$
bonjour
Un fichier en lecture seule est mis à disposition
d'utilisateurs sur un réseau local
Peut-on éviter le message "voulez vous apporter les
modifications" à la fermeture du fichier?


.



Avatar
fermer sans enregistrer
-----Message d'origine-----
que veux-tu faire enregistre puis fermer ou fermer sans
enregistre ?


"bibi" wrote in
message

news:0c7301c3a540$6c1129e0$
désolé mais tres novice je fais quoi de cette formule?
-----Message d'origine-----
Salut,
Application.DisplayAlerts = False
@+
Michel.

"bibi" wrote in
message

news:0a2101c3a538$369fcda0$
bonjour
Un fichier en lecture seule est mis à disposition
d'utilisateurs sur un réseau local
Peut-on éviter le message "voulez vous apporter les
modifications" à la fermeture du fichier?


.




.




Avatar
Michel HOLDERITH
Alors :
tu mets dans thisworkbook dans VBA :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True
Application.DisplayAlerts = False
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Cancel = True
End Sub

@+
Michel.

wrote in message
news:0af001c3a542$f33fdfe0$
fermer sans enregistrer
-----Message d'origine-----
que veux-tu faire enregistre puis fermer ou fermer sans
enregistre ?


"bibi" wrote in
message

news:0c7301c3a540$6c1129e0$
désolé mais tres novice je fais quoi de cette formule?
-----Message d'origine-----
Salut,
Application.DisplayAlerts = False
@+
Michel.

"bibi" wrote in
message

news:0a2101c3a538$369fcda0$
bonjour
Un fichier en lecture seule est mis à disposition
d'utilisateurs sur un réseau local
Peut-on éviter le message "voulez vous apporter les
modifications" à la fermeture du fichier?


.




.




Avatar
bibi
avec tous mes remerciements
A+
-----Message d'origine-----
Alors :
tu mets dans thisworkbook dans VBA :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True
Application.DisplayAlerts = False
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As

Boolean)
Cancel = True
End Sub

@+
Michel.

wrote in message
news:0af001c3a542$f33fdfe0$
fermer sans enregistrer
-----Message d'origine-----
que veux-tu faire enregistre puis fermer ou fermer sans
enregistre ?


"bibi" wrote in
message

news:0c7301c3a540$6c1129e0$
désolé mais tres novice je fais quoi de cette formule?
-----Message d'origine-----
Salut,
Application.DisplayAlerts = False
@+
Michel.

"bibi" wrote in
message

news:0a2101c3a538$369fcda0$
bonjour
Un fichier en lecture seule est mis à disposition
d'utilisateurs sur un réseau local
Peut-on éviter le message "voulez vous apporter les
modifications" à la fermeture du fichier?


.




.




.