Copie d'un fichier Access à partir d'Excel

jeanmichel60

XLDnaute Nouveau
Bonjour à tous,

Mes données saisies dans excel sont stockées dans des tables Access.
De temps en temps je faisais une copie du fichier Access sur ma clé USB en cas ou...
A partir d'un bouton et de VBA dans Excel est-il possible de faire une copie de sauvegarde du fichier Access vers une clé USB.

Bonne journée :)

Jean-Michel
 

tototiti2008

XLDnaute Barbatruc
Re : Copie d'un fichier Access à partir d'Excel

Bonjour Jeanmichel,

Code:
Sub CopieBase()
Dim FS
    Set FS = CreateObject("Scripting.FileSystemObject")
    'FS.CopyFile Source, Destination, Overwrite
    FS.CopyFile "y:\Mabase.mdb", "u:\Mabase.mdb", True
    Set FS = Nothing
End Sub
 

Discussions similaires