Bonjour,
J'ai une Macro sous Excel 97 qui remplace un fichier existant
ActiveWorkbook.SaveAs FileName:="C:\WINDOWS\Bureau\Toto.xls",
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Cela affiche un message "Le fichier "Toto.xls" existe déjà, voulez-vous le
remplacer ?
Il faut cliquer sur oui à chaque fois pour que la macro continue
Existe-t-il du code permettant que ce message ne s'affiche pas et que
l'enregistrement se fasse d'office
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
LSteph
Bonsoir Jdel,
le principe est le suivant:, désactiver les alertes avant et les réactiver après
Sub regit() Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:="toto.xls" Application.DisplayAlerts = True End Sub
'lSteph "jdel" a écrit dans le message de news: 430dff10$0$993$
Bonjour, J'ai une Macro sous Excel 97 qui remplace un fichier existant ActiveWorkbook.SaveAs FileName:="C:WINDOWSBureauToto.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:úlse, CreateBackup:úlse
Cela affiche un message "Le fichier "Toto.xls" existe déjà, voulez-vous le remplacer ? Il faut cliquer sur oui à chaque fois pour que la macro continue Existe-t-il du code permettant que ce message ne s'affiche pas et que l'enregistrement se fasse d'office
Merci
Bonsoir Jdel,
le principe est le suivant:, désactiver les alertes avant et les réactiver
après
Sub regit()
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:="toto.xls"
Application.DisplayAlerts = True
End Sub
'lSteph
"jdel" <jdel5@wanadoo.fr> a écrit dans le message de news:
430dff10$0$993$8fcfb975@news.wanadoo.fr...
Bonjour,
J'ai une Macro sous Excel 97 qui remplace un fichier existant
ActiveWorkbook.SaveAs FileName:="C:WINDOWSBureauToto.xls",
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:úlse, CreateBackup:úlse
Cela affiche un message "Le fichier "Toto.xls" existe déjà, voulez-vous le
remplacer ?
Il faut cliquer sur oui à chaque fois pour que la macro continue
Existe-t-il du code permettant que ce message ne s'affiche pas et que
l'enregistrement se fasse d'office
le principe est le suivant:, désactiver les alertes avant et les réactiver après
Sub regit() Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:="toto.xls" Application.DisplayAlerts = True End Sub
'lSteph "jdel" a écrit dans le message de news: 430dff10$0$993$
Bonjour, J'ai une Macro sous Excel 97 qui remplace un fichier existant ActiveWorkbook.SaveAs FileName:="C:WINDOWSBureauToto.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:úlse, CreateBackup:úlse
Cela affiche un message "Le fichier "Toto.xls" existe déjà, voulez-vous le remplacer ? Il faut cliquer sur oui à chaque fois pour que la macro continue Existe-t-il du code permettant que ce message ne s'affiche pas et que l'enregistrement se fasse d'office
Merci
jdel
Merci LSteph c'est juste ce qu'il me fallait LSteph a écrit dans le message : #
Bonsoir Jdel,
le principe est le suivant:, désactiver les alertes avant et les réactiver après
Sub regit() Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:="toto.xls" Application.DisplayAlerts = True End Sub
'lSteph "jdel" a écrit dans le message de news: 430dff10$0$993$
Bonjour, J'ai une Macro sous Excel 97 qui remplace un fichier existant ActiveWorkbook.SaveAs FileName:="C:WINDOWSBureauToto.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:úlse, CreateBackup:úlse
Cela affiche un message "Le fichier "Toto.xls" existe déjà, voulez-vous le
remplacer ? Il faut cliquer sur oui à chaque fois pour que la macro continue Existe-t-il du code permettant que ce message ne s'affiche pas et que l'enregistrement se fasse d'office
Merci
Merci LSteph c'est juste ce qu'il me fallait
LSteph <lecocosteph@frite.fr> a écrit dans le message :
#cAvH4ZqFHA.2076@TK2MSFTNGP14.phx.gbl...
Bonsoir Jdel,
le principe est le suivant:, désactiver les alertes avant et les réactiver
après
Sub regit()
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:="toto.xls"
Application.DisplayAlerts = True
End Sub
'lSteph
"jdel" <jdel5@wanadoo.fr> a écrit dans le message de news:
430dff10$0$993$8fcfb975@news.wanadoo.fr...
Bonjour,
J'ai une Macro sous Excel 97 qui remplace un fichier existant
ActiveWorkbook.SaveAs FileName:="C:WINDOWSBureauToto.xls",
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:úlse, CreateBackup:úlse
Cela affiche un message "Le fichier "Toto.xls" existe déjà, voulez-vous
le
remplacer ?
Il faut cliquer sur oui à chaque fois pour que la macro continue
Existe-t-il du code permettant que ce message ne s'affiche pas et que
l'enregistrement se fasse d'office
Merci LSteph c'est juste ce qu'il me fallait LSteph a écrit dans le message : #
Bonsoir Jdel,
le principe est le suivant:, désactiver les alertes avant et les réactiver après
Sub regit() Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:="toto.xls" Application.DisplayAlerts = True End Sub
'lSteph "jdel" a écrit dans le message de news: 430dff10$0$993$
Bonjour, J'ai une Macro sous Excel 97 qui remplace un fichier existant ActiveWorkbook.SaveAs FileName:="C:WINDOWSBureauToto.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:úlse, CreateBackup:úlse
Cela affiche un message "Le fichier "Toto.xls" existe déjà, voulez-vous le
remplacer ? Il faut cliquer sur oui à chaque fois pour que la macro continue Existe-t-il du code permettant que ce message ne s'affiche pas et que l'enregistrement se fasse d'office