[RÉSOLU] VBA : sauvegarde sans confirmation.

[dionys0s]

Rebonjour le forum

ma demande est peut-être un peu tordue ou perfectionniste, mais comme c'est un peu le but de VBA je demande quand même.

J'ai le code suivant :

Sub Effacer_les_exports()

Application.ScreenUpdating = False

Application.ShowWindowsInTaskbar = False

    ChDir _
        "C:\Chemin d'accès"
    Workbooks.Open Filename:= _
        "C:\Chemin d'accès\fichier.xls"
        Cells.Select
        Selection.Clear
        Range("A1").Select
        ActiveWorkbook.save
        ActiveWindow.Close

Application.ScreenUpdating = True

Application.ShowWindowsInTaskbar = True
        
End Sub

Il se trouve que mon fichier .xls est issu d'un export, qu'il est en format csv, et qu'au moment de sauvegarder le fichier, (ActiveWorkbook.save), la macro s'interrompt pour me demander confirmations du changement de format (de Excel 2.1 à un Excel 2003 donc). Est-ce possible d'automatiser la confirmation sur oui, et qu'ainsi la macro ne s'interrompe pas ? Je demande parce-que la macro ouvre, vide, sauvegarde et ferme pas mal de fichiers à la suite et ça ralentit pas mal son execution du coup.

J'espère m'être fait comprendre

D'avance merci pour vorte aide

 

[Efgé]

Re : VBA : sauvegarde sans confirmation.

Bonjour dionys0s,
As tu essaillé de mettre

Application.DisplayAlerts = False

en début de macro et

Application.DisplayAlerts = True

En fin ?
Cordialement

 

[Dull]

Re : VBA : sauvegarde sans confirmation.

Salut Dionis0s le Forum

peut-être avec ça

'...
    ChDir _
        "C:\Chemin d'accès"
    Workbooks.Open Filename:= _
        "C:\Chemin d'accès\fichier.xls"
        Cells.Select
        Selection.Clear
        Range("A1").Select
        ThisWorkbook.Close Savechanges:=True
'...

EDITION: Salut FG🙂

Bonne Journée

 

[dionys0s]

Re : VBA : sauvegarde sans confirmation.

Fabuleux...

Merci beaucoup

Longue vie à XLD !!