copier à partir d'excel un fichier .dbf de c\ici vers c\la

[carlos]

Bonsoir

je souhaite automatiser à partir d'excel ou autre un copier coller d'un fichier "Acopier.dbf" qui se trouve sous c\ici vers c\la

 

[Lord Nelson]

Salut Carlos,

Voici une macro qui te permettra de le faire :

Sub CopierFichier()
Dim fs
Dim CheminSource As String
Dim CheminDest As String
'Chemins des fichiers à adapter (peu importe le type de fichier)
CheminSource = "C:\ici\FichierAcopier.dbf"
CheminDest = "C:\Ailleurs\"
Set fs = CreateObject("Scripting.FileSystemObject")
fs.CopyFile CheminSource, CheminDest
End Sub

A+
Horatio

 

[carlos]

Bonjour

Une fois de plus Tres tres efficace

Merci