Discussion :

[meumeu73.1]

Bonjour,

Actuellement, j'exporte une table au format Xml à l'aide d'une macro. Ce que je voudrai faire maintenant, c'est de pouvoir nommer mon fichier en y ajoutant la date de dernier chargement.

Ci joint mon code actuel :

Code :

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

1
2
3
4
5
sub Xml()
set tb = ActiveDocument.GetSheetObject("CH291")
tb.ServerSideExportEx "\\repertoire\repertoire\Xml\xml1.xml" , ";" , 3
'0=HTML, 1=Text, 2=Bitmap, 3=XML, 4=QVD, 5=BIFF
end sub

Donc mon fichier va s'appeller xml1.xml et moi je voudrai qu'il s'appelle xml1_26-09-2011.xml.

C'est la suite de mon post avec le problème de balise.

Par avance merci pour votre.

[FORMULARY]

Il faut utiliser la propriété lastreloadtime :

Code :

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

1
2
3
4
5
6
7
8
9
10
sub Xml()
lrt=activedocument.getproperties.lastreloadtime
lrd=formatdatetime(lrt,2)
lrd=replace(lrd,"/","_")
nomdoc="\\serveur\repertoire\Xml\xml1_"+lrd+".xml"
 
SET tb = ActiveDocument.GetSheetObject("CH291")
tb.ServerSideExportEx  nomdoc , ";" , 3
'0=HTML, 1=Text, 2=Bitmap, 3=XML, 4=QVD, 5=BIFF
end sub