Déplacement d'un fichier commencant par ...

Résolu
picsoin Messages postés 158 Date d'inscription   Statut Membre Dernière intervention   -  
picsoin Messages postés 158 Date d'inscription   Statut Membre Dernière intervention   -
Bonsoir à tous,

J'ai un bouton dans un formulaire Access2016 qui doit déplacer un fichier d'un dossier à un autre:
Private Sub TestDeplacFic_Click()
Name "C:\Sceau\DST0001014500.csv" _
As "I:\MyCloud\DSTNOUV.csv"
End Sub
Jusque là, pas de problème, ça marche.

Le problème est que mon fichier source change tout le temps et dans la réalité il commence toujours par DST000
Si j'écris:
Name "I:\Sceau\DST000*.csv" _
As "I:\MyCloud\DSTNOUV.csv"
Ca marche pô! :-(

Un gentil commentçamarchois pourrait il me donner la bonne syntaxe?

A voir également:

3 réponses

Réponse 1 / 3
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Vous ne deplacez pas le fichier, vous en faites une copie.
Connaissez-vous le nom du fichier a copier ou avez vous le moyen de le connaitre et alors mettre le nom de ce fichier dans une variable, ce dessous exemple de code 

Sub test()
    Fichier = "Classeurori1.csv"
    Name "D:\_ACSV\" & Fichier As "D:\_ACSV\Février\" & Fichier
End Sub
0
Réponse 2 / 3
picsoin Messages postés 158 Date d'inscription   Statut Membre Dernière intervention   5
 
Bonjour,
Merci de votre intervention.

Le sujet principal de ce post est que je connais toujours une partie du nom. Il s'agit d'un fichier téléchargé régulièrement.
Pour l'exemple aujourd'hui c'est DST000452389.csv, demain ce sera peut-être DST000987541.csv

Dans votre code, la variable FICHIER est bonne pour un nom fix. Pas de bol, le nom change mais commence toujours par DST000

Je pense que l'on peut appeler "copie", un "déplacement" puisque il est supprimé dans le dossier source dans mon cas :-)
0
Réponse 3 / 3
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

essaie cela: 

MsgBox "C:\Users\....\Documents\" & Dir("C:\Users\....\Documents\\DST000*")'adapter le chemin du dossier
0
picsoin Messages postés 158 Date d'inscription   Statut Membre Dernière intervention   5
 
Merci ... Je ne comprends pas ce que la MsgBox vient faire dans mon cas? pour tester si la recherche du fichier source est positif?
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713 > picsoin Messages postés 158 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Dans votre code, la variable FICHIER est bonne pour un nom fix Tout a fait Thiery, c'est un exemple pour avoir un nom de fichier dans une variable.

pour tester si la recherche du fichier source est positif? Si vous nous disiez comment vous choisissez le fichier CSV, ca ferait progresser le Schmilblic
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Je ne comprends pas ce que la MsgBox vient faire dans mon cas?

Si tu l'avais essayé, tu te serais aperçu qu'il te donnait le chemin complet de ton fichier.
Ensuite remplacer le MsgBox par une variable.

C'est élémentaire mon cher watson!

@+ Le Pivert
0
picsoin Messages postés 158 Date d'inscription   Statut Membre Dernière intervention   5 > cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention  
 
Je n'était pas chez moi quand j'ai lu le message :-)
Et j'ai lu trop rapidement.
Et je te tire mon chapeau.

La soluce est donc: 
FICHIER = "I:\DossierSource\" & Dir("I:\DossierSource\\TEST000*")
Name FICHIER _
  As "I:\DossierDestination\NouveauNom.csv"


Merci beaucoup
0