salut, le code fournit ci dessous fonctionne en vba, j'ouvre un classeur excel puis le lance.
La macro traite tous les fichiers d'un dossier mais le pb est que le contenu des fichiers dbf créés n'est pas bon.
en effet tousles .dbf créés contiennent les valeurs du premier fichier excel de la liste.
Capito?
quelqu'un peut -il m'aider???
Dim temp As String
Dim fso, dossier, lstfichiers, f
Const chemin = "C:\testo\temp"
Set fso = CreateObject("Scripting.FileSystemObject")
Set dossier = fso.GetFolder(chemin)
Set lstfichiers = dossier.Files
For Each f In lstfichiers
Range("A1").Select
Selection.CurrentRegion.Select
Selection.Columns.AutoFit
Columns("C:C").Select
Selection.NumberFormat = "0.00"
Range("A1").Select
Selection.CurrentRegion.Select
temp = Left(f.Path, Len(f.Path) - 4) + ".dbf"
ActiveWorkbook.SaveAs Filename:=temp, FileFormat:=xlDBF4, _
CreateBackup:=False
Next f
MsgBox "traitement terminé"