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
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
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
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
Envoyé par Aide en ligne
jessai de copier une base access vers un fichier spécifié.
c'est pas compliqué.mai je beugue au niveau de la ligne filecopy...
montre ton vrai code ... ce qu'il y a plus haut c'est pas fini non ...?
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.. ...) ,....Envoyé par VBBBA
Partager