Discussion :

[anaisanais]

Bonjour,

Je souhaite enregistrer une page Excel sous format texte, mais avec comme nom la date et l'heure.

Mon code est le suivant:

Code :

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

1
2
3
4
5
6
Dim heure2, date2 As String
date2 = Format(Date, "ddmmyy")
heure2 = Format(Time, "hhnn")
 
   ActiveWorkbook.SaveAs Filename:="C:\Documents and Settings\(date2) & " - " & (heure2).txt" _
        , FileFormat:=xlUnicodeText, CreateBackup:=False

Mais ca ne fonctionne pas... Je ne sais pas comment faire, quelqu'un peut il me dire ce que je peux faire?

merci beaucoup
Anais

[Pierre Fauconnier]

Bonsoir

Il faut composer le nom du fichier en concaténant (joindre des chaines de caractères) les différentes variables

Code :

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

1
2
ActiveWorkbook.SaveAs Filename:="C:\Documents and Settings\" & date2 & " - " & heure2 & ".txt" _
        , FileFormat:=xlUnicodeText, CreateBackup:=False

[Bigalo]

Bonsoir,

Code :

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

1
2
3
 
   ActiveWorkbook.SaveAs Filename:="C:\Documents and Settings\(" & date2 & ") - (" & heure2 & ").txt" _
        , FileFormat:=xlUnicodeText, CreateBackup:=False

Quelque chose comme cela. Pas testé car rendez-vous à l’extérieur.

[anaisanais]

ca marche.. merci beaucoup!