Discussion :

[Gorillo]

Bonjour,

J'ai développé un bout de code en VBA et j'essaie d'enregistrer le résultat produit dans un nouveau fichier excel. Je veux que ce fichier soit un classeur sans macro, soit un xlsx (ou éventuellement un xls).

Le pb c'est que malgré ce code pour l'enregistrement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim nom As String                                           'nom de fichier + sauvegarde
    nom = "Reporting_teletrans_" & Format(Date, "dd-mm-yyyy") & "_" & Format(Time, "hhmm") & ".xlsx"
    ActiveWorkbook.SaveCopyAs ActiveWorkbook.Path & "\" & nom
    rep = MsgBox("Votre base de données est sauvegardée sous le nom : " & nom, vbYes + vbInformation, "Copie sauvegarde classeur")
 
    ActiveWorkbook.Close False
    Application.DisplayAlerts = True

J'ai ce message d'erreur qui apparaît à l'ouverture :


Pourriez-vous m'aider ??
Merci