Discussion: Saveas
Afficher un message
Vieux 29/02/2004, 21h41   #3 (permalink)
JM
Guest
 
Messages: n/a
Par défaut Re: Saveas

Non, non, ce n'est pas ca, j'avais bien formaté la date comme tu l'indiques:
un extrait de mon prg:

l'utilisateur en cliquant sur un bouton, doit provoquer l'enregistrement du fichier courant

L'enregistrement doit être sous la forme: "Saisie en date du JJMMAA.xls"
dans mon essai ci-dessous, j'ai mis en cellule A30 le texte "Saisie en date du "
La cellule D3 contient une date saisie par l'utilisateur

Dim e As String * 18 'entête du nom de fichier
Dim d As String * 6 'date
e = Range("a30") ' Heures du
d = Range("D3") 'le format est ddmmyy
ActiveWorkbook.SaveAs Filename:="C:\Heures\" & (e) & (d)

merci qq même, l'idée était bonne mais je l'avis déjà exploitée
Bye
JM