Problème avec la sauvegarde avec la date et l'heure de mon fichier

Résolu/Fermé
bassmart Messages postés 281 Date d'inscription jeudi 19 février 2015 Statut Membre Dernière intervention 19 décembre 2023 - 8 avril 2021 à 21:10
bassmart Messages postés 281 Date d'inscription jeudi 19 février 2015 Statut Membre Dernière intervention 19 décembre 2023 - 12 avril 2021 à 16:14
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!
A voir également:

1 réponse

f894009 Messages postés 17213 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 25 décembre 2024 1 711
9 avril 2021 à 06:51
0
f894009 Messages postés 17213 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 25 décembre 2024 1 711
10 avril 2021 à 07:12
Suite:
de meme probleme des "/" pour la date
0
bassmart Messages postés 281 Date d'inscription jeudi 19 février 2015 Statut Membre Dernière intervention 19 décembre 2023 1 > f894009 Messages postés 17213 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 25 décembre 2024
12 avril 2021 à 16:14
Merci pour la réponse! Je n'y avais pas pensé à celle-là!
0