Discussion :

[VBBBA]

bonjour a tous

je souhaite faire une macro en vba qui copie certains fichiers (exel ou access) vers un dossier précis.

pouvez vous m'indiquer la méthode a suivre. toute aide est la bienvenue.mercie d'avance

[SfJ5Rpw8]

filecopy,Dir et

[VBBBA]

salut
t fidéle au poste a ce que je vois

jai essayé ta methode ca marche pas.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
 
const PATH as string="chemin du fichier cible de sauvegarde"
 
Private Sub SAVE_Click()
 
'On Error GoTo G
 
'Dim o As FileSystemObject
 
'chek du serveur de sauvegarde
 
Set o = New FileSystemObject
 
If Not o.FolderExists(PATH) Then
 
    MsgBox "impossible de trouver le chemin réseau cible" & PATH & Chr(13) & "connecter ce lecteur réseau.", vbCritical
 
       Exit Sub
End If
 
 
 
 
 
 
 
 
Dim A As String
Dim B As String
 
A = PATH
B = "T:\chemin de la base access\nom de la base.mdb "
FileCopy B, A
 
msg = "La restauration de la base de registre s' est bien déroulée!"
MsgBox msg, vbOKOnly
 
 
G:
msg = "La sauvegarde des fichiers est impossible"
     MsgBox msg, vbExclamation, Title$
 
 
End Sub

[SfJ5Rpw8]

et tu essai de faire quoi avec ce code ... ? c'est quoi qui marche pas...?
ma "méthode" c'était F1 sur Filecopy ce qui donne

FileCopy, instruction


Copie un fichier.

Syntaxe

FileCopy source, destination

La syntaxe de l'instruction FileCopy comprend les arguments nommés suivants ...

[VBBBA]

jessai de copier une base access vers un fichier spécifié.
c'est pas compliqué.mai je beugue au niveau de la ligne filecopy...

[SfJ5Rpw8]

montre ton vrai code ... ce qu'il y a plus haut c'est pas fini non ...?

[SfJ5Rpw8]

jessai de copier une base access vers un fichier spécifié.
c'est pas compliqué.mai je beugue au niveau de la ligne filecopy...

traduit cela... ! déjà ..., ensuite nettoie ton code de ce qui te parait inutile et reposte le code que tu teste ... sans tes différents essais....(que viens faire fileSystemObject ici.. ...) ,....