Discussion :

[johan89]

Bonjour,

Mon besoin est simple : Je souhaite pouvoir sauter 12 caractères qui ne font que m'embêter (LOL) dans la manipulation de fichiers.
Ces 12 caractères correspondent à la date de génération du fichier et font partis de la norme, je ne peux donc pas les retirer.

Code :

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

Workbooks.OpenText Filename:=Chemin_Reseau & "TOTO.form.201110281445." & Le_ID

Il s'agit de pouvoir rendre "générique" les 12 caractères :

Code :

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

201110281445

Il faut prendre en compte le fait qu'ils sont présents mais que ma macro ne tienne pas compte de leur valeur ! Est-ce possible ?!

[Jean-Pierre49]

Bonjour

à tout hasard
en remplacant 201110281445 Par *

Code :

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

Workbooks.OpenText Filename:=Chemin_Reseau & "TOTO.form.*." & Le_ID

Tu dis

Edit : Fonctionne en 2003

[johan89]

Malheureusement Non

[Jean-Pierre49]

Peut être un problème avec 2002

Car avec 2003

Code :

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

1
2
3
Dim Chemin_Reseau
Chemin_Reseau = "E:\"
Workbooks.OpenText Filename:=Chemin_Reseau & "TOTO.form.*.txt" ' & Le_ID

Ouvre bien le fichier TOTO.form.201110281445.txt
Bon courage

Edit :
Envoyé par bbil

et tu ouvriras le premier fichier trouvé ( tu nous as pas dit s'il y en avait plusieurs ??)

Peut être un autre problème

[SfJ5Rpw8]

bonjour,

Tu peu utiliser dir pour trouver le nom complet de ton fichier

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Dim stFichier as string 
StFichier = Dir (Chemin_Reseau & "TOTO.form.*." & Le_ID)
 
if stFichier = "" Then 
   MsgBox "fichier introuvable"
  exit sub
else
 MsgBox "Ouvre : " & stFichier
Workbooks.OpenText Filename:=Chemin_Reseau & stFichier
endif

et tu ouvriras le premier fichier trouvé ( tu nous as pas dit s'il y en avait plusieurs ??)

[Didier Gonard]

Bonjour,

Dans Microsoft Windows, La fonction Dir permet d'utiliser des jokers ou caractères génériques (* ou ?) pour sélectionner plusieurs fichiers. Sur le Macintosh, ces caractères sont considérés comme des caractères de noms de fichiers valides et ne peuvent être utilisés comme caractères génériques pour spécifier des fichiers multiples.

Tu n'es pas sous Mac

cordialement,

Didier