-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Pej
Merci de ta réponse eddy mais ce n'est pas ça,je me suis mal exprimé. A l'aide d'un fichier A, je cherche à faire une mise à jour d'un fichier B et le sauvegarder au même endroit et sous le même nom. Jusque là, pas de pb mais il me demande si je veux écraser l'ancien fichier du même nom...comment faire pour qu'il le fasse automatiquement?
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Merci de ta réponse eddy mais ce n'est pas ça,je me suis mal exprimé. A
l'aide d'un fichier A, je cherche à faire une mise à jour d'un fichier B et
le sauvegarder au même endroit et sous le même nom. Jusque là, pas de pb mais
il me demande si je veux écraser l'ancien fichier du même nom...comment faire
pour qu'il le fasse automatiquement?
Merci de ta réponse eddy mais ce n'est pas ça,je me suis mal exprimé. A l'aide d'un fichier A, je cherche à faire une mise à jour d'un fichier B et le sauvegarder au même endroit et sous le même nom. Jusque là, pas de pb mais il me demande si je veux écraser l'ancien fichier du même nom...comment faire pour qu'il le fasse automatiquement?
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Pej
Bonjour et Merci beaucoup.
Saurais-tu également par hasard interdire la sauvegarde (click sur disquette dans le menu excel) du fichier et fermer le fichier (voir l'application complète) lors de cette tentative.
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Bonjour et Merci beaucoup.
Saurais-tu également par hasard interdire la sauvegarde (click sur disquette
dans le menu excel) du fichier et fermer le fichier (voir l'application
complète) lors de cette tentative.
Saurais-tu également par hasard interdire la sauvegarde (click sur disquette dans le menu excel) du fichier et fermer le fichier (voir l'application complète) lors de cette tentative.
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Pounet95
Bonjour, XL2000 WIndows XP Pro
Dans le module ThisWorkBook, évènement Before_Save, forcer le flag 'sauvé" à vrai et empêcher l'affichage de la boite de dailogue Enregistrer sous Eventuellement, quitter Excel
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 'fla sauvé à VRAI ThisWorkbook.Saved = True 'Emp^che d'afficher boite Enregistrer sous Cancel = True 'pour voir qu'on est passé par le module MsgBox "toto" 'Allez, tchao instance d'Excel !!! Application.Quit End Sub
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ Conseillé : http://dj.joss.free.fr/netiquet.htm (charte, nétiquette, conseils, abréviations, souriettes...) http://www.excelabo.net/mpfe/connexion.php (connexion, conseils...)
"Pej" a écrit dans le message de news:
Bonjour et Merci beaucoup.
Saurais-tu également par hasard interdire la sauvegarde (click sur disquette dans le menu excel) du fichier et fermer le fichier (voir l'application complète) lors de cette tentative.
-- Ceci est une signature automatique de MesNews. Site : http://www.mesnews.net
Bonjour,
XL2000 WIndows XP Pro
Dans le module ThisWorkBook, évènement Before_Save,
forcer le flag 'sauvé" à vrai et empêcher l'affichage de la boite de
dailogue Enregistrer sous
Eventuellement, quitter Excel
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
'fla sauvé à VRAI
ThisWorkbook.Saved = True
'Emp^che d'afficher boite Enregistrer sous
Cancel = True
'pour voir qu'on est passé par le module
MsgBox "toto"
'Allez, tchao instance d'Excel !!!
Application.Quit
End Sub
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"Pej" <Pej@discussions.microsoft.com> a écrit dans le message de news:
393A0D94-C821-4F86-BCCC-AA3C35618136@microsoft.com...
Bonjour et Merci beaucoup.
Saurais-tu également par hasard interdire la sauvegarde (click sur
disquette
dans le menu excel) du fichier et fermer le fichier (voir l'application
complète) lors de cette tentative.
Dans le module ThisWorkBook, évènement Before_Save, forcer le flag 'sauvé" à vrai et empêcher l'affichage de la boite de dailogue Enregistrer sous Eventuellement, quitter Excel
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 'fla sauvé à VRAI ThisWorkbook.Saved = True 'Emp^che d'afficher boite Enregistrer sous Cancel = True 'pour voir qu'on est passé par le module MsgBox "toto" 'Allez, tchao instance d'Excel !!! Application.Quit End Sub
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ Conseillé : http://dj.joss.free.fr/netiquet.htm (charte, nétiquette, conseils, abréviations, souriettes...) http://www.excelabo.net/mpfe/connexion.php (connexion, conseils...)
"Pej" a écrit dans le message de news:
Bonjour et Merci beaucoup.
Saurais-tu également par hasard interdire la sauvegarde (click sur disquette dans le menu excel) du fichier et fermer le fichier (voir l'application complète) lors de cette tentative.
