Exportation d'un onglet

[gex1403]

Salut le forum

Je voudrais exporter un onglet et l'enregistrer au format Dbf, sous un nom defini, CM + la date du jour qui est sur la feuille excel.
J'ai essayé avec l'enregistreur de macro, mais ca me met deux ou toris messages avant que le fichier ne se ferme.
Y a t'il des exceliens qui peuvent resoudrent mon problème????
Je post un exemple pour plus de precisions.

Merci d'avance à ceux qui s'intersseront à mon problème.
Pas decu jusqu'a présent ( y a vraiment des pros )

@micalement

 

[gex1403]

http://cjoint.com/?gAsvseQM7a

Oups, voici le lien pour le fichier joint

Désolé

 

[MichelXld]

bonsoir

tu peux tester cette synthaxe

Sub ExportDonnees()
ThisWorkbook.Sheets('Export').Copy
ActiveWorkbook.Sheets('Export').Range('A1').CurrentRegion.Select
ActiveWorkbook.SaveAs Filename:='H:\\\\\\\\CM' & Format(Date, 'ddmmyyyy') & '.dbf', _
FileFormat:=xlDBF4, CreateBackup:=False
ActiveWorkbook.Close False
ThisWorkbook.Sheets('Export').Range('A2:E5000').ClearContents
Sheets('Feuil1').Select
End Sub


bonne soiree
MichelXld

 

[gex1403]

Salut le forum, Michelxld

Merci Michel, c'est bon, j'ai reussi à le faire , ton code ressemble étrangement au mien avec quelques nuances.

@micalement