OVH Cloud OVH Cloud

Choix apres un .SaveAs

4 réponses
Avatar
Marc
Bonjour,

j ai une fonction qui enregistre un classeur
en écrasant une version précedente.
Apres l execution de mon SaveAs
j'ai une Mgsbox qui me demande
si je veux réecrire dessus :
(oui, non, annuler).
J'aimerais qu'il n'y ait plus ce choix. mais
comment faire ? Si je fais non , ou annuler
ça plante.

merci

4 réponses

Avatar
Nicolas B.
Salut Marc,

Rajoute cette ligne avant d'enregistrer le classeur :
application.displayalertsúlse


A+
--
Nicolas B.


Bonjour,

j ai une fonction qui enregistre un classeur
en écrasant une version précedente.
Apres l execution de mon SaveAs
j'ai une Mgsbox qui me demande
si je veux réecrire dessus :
(oui, non, annuler).
J'aimerais qu'il n'y ait plus ce choix. mais
comment faire ? Si je fais non , ou annuler
ça plante.

merci


Avatar
Christian.L
Bonjour

Il faut détruire le fichier existant par un "Kill" avant le SaveAs.

C.L.


"Marc" a écrit dans le message de
news:
Bonjour,

j ai une fonction qui enregistre un classeur
en écrasant une version précedente.
Apres l execution de mon SaveAs
j'ai une Mgsbox qui me demande
si je veux réecrire dessus :
(oui, non, annuler).
J'aimerais qu'il n'y ait plus ce choix. mais
comment faire ? Si je fais non , ou annuler
ça plante.

merci




Avatar
Rai
Nicolas B. wrote:
Salut Marc,

Rajoute cette ligne avant d'enregistrer le classeur :
application.displayalertsúlse


A+

Bonjour,


Serait-il opportun de remettre displayalerts à "true" après la ligne du saveas ??


--
Cordialement,

Rai
Remplacer point par la ponctuation appropriée pour répondre...

Avatar
Jacky
Bonjour,
Voici la remarque d'Alain à ce sujet et qui est tout à fait justifié

Ce n'est pas tout à fait exact : pour s'en persuader, exécuter zz1 puis zz2

Sub zz1()
Application.DisplayAlerts = False
Sheets(1).Delete
End Sub

Sub zz2()
Sheets(1).Delete
End Sub

Il n'en demeure pas moins que c'est une excellente et nécessaire précaution
Ce qui même mieux c'est de remettre à true juste après la ligne "delete"
(sans
attendre la fin de la macro)
C'était pour le smilblick

AV

Salutations
JJ
"Rai" a écrit dans le message de
news:cbh4b5$i4k$
Nicolas B. wrote:
Salut Marc,

Rajoute cette ligne avant d'enregistrer le classeur :
application.displayalertsúlse


A+

Bonjour,


Serait-il opportun de remettre displayalerts à "true" après la ligne du
saveas ??


--
Cordialement,

Rai
Remplacer point par la ponctuation appropriée pour répondre...