Problème avec la sauvegarde avec la date et l'heure de mon fichier [Résolu]

Signaler
Messages postés
270
Date d'inscription
jeudi 19 février 2015
Statut
Membre
Dernière intervention
12 avril 2021
-
Messages postés
270
Date d'inscription
jeudi 19 février 2015
Statut
Membre
Dernière intervention
12 avril 2021
-
Bonjour à tous,

J'ai un petit souci avec la fin de ma programmation pour la sauvegarde de mon fichier en xlsx. Ça fonctionnais juste avec la date mais lorsque j'ai ajouté l'heure, ça plante à la ligne d'ensuite
.SaveAs filename:=Chemin & Nom, FileFormat:=xlWorkbookDefault, CreateBackup:=False, local:=True


Voici la fin de mon code pour la sauvegarde:
With ActiveWorkbook
    rep = ""
    Application.DisplayAlerts = False
        If MsgBox("Voulez-vous sauvegarder ce fichier en .xlsx?", vbOKCancel + vbQuestion, "SAUVEGARDE") = vbCancel Then
            Application.ThisWorkbook.Saved = True
            .Close
            Exit Sub
        Else
            
            Nom = Sondage & "_traité" & " _" & now() &  ".xlsx"
            .SaveAs filename:=Chemin & Nom, FileFormat:=xlWorkbookDefault, CreateBackup:=False, local:=True
            rep = rep & "Sauvegarde du fichier sous le nom : " & Nom & Chr(10)
        End If
                
                      
        If rep <> "" Then
            MsgBox "Le fichier à été sauvagardé dans le répertoire:" & Chr(10) & Chemin & Chr(10) & Chr(10) & rep, vbInformation, "Sauvegarde de la copie du fichier"
        End If
    
           
       
    ActiveWorkbook.Close
End With


Si je code de cette façon, ça fonctionne:
 Nom = Sondage & "_traité" & " _" & format(date, "yyyy-mm-jj") & " " & format(time, "hhmm") &  ".xlsx"


Je ne comprends pas pourquoi?

Merci pour votre aide!

1 réponse

Messages postés
15725
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
11 avril 2021
1 481
Messages postés
15725
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
11 avril 2021
1 481
Suite:
de meme probleme des "/" pour la date
Messages postés
270
Date d'inscription
jeudi 19 février 2015
Statut
Membre
Dernière intervention
12 avril 2021
1 >
Messages postés
15725
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
11 avril 2021

Merci pour la réponse! Je n'y avais pas pensé à celle-là!