Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 03/11/2011, 11h10   #1
Nouveau Membre du Club
 
Johan
Etudiant Miagiste en apprentissage (Master 2)
Inscription : avril 2011
Messages : 128
Détails du profil
Informations personnelles :
Nom : Johan
Localisation : France

Informations professionnelles :
Activité : Etudiant Miagiste en apprentissage (Master 2)

Informations forums :
Inscription : avril 2011
Messages : 128
Points : 27
Points : 27
Par défaut Sauter n caractères dans l'utilisation d'un nom de fichier

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 :
Workbooks.OpenText Filename:=Chemin_Reseau & "TOTO.form.201110281445." & Le_ID
Il s'agit de pouvoir rendre "générique" les 12 caractères : 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 ?!
johan89 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/11/2011, 11h25   #2
Membre Expert
 
Avatar de Jean-Pierre49
 
Homme J-Pierre Catherine
Conception Calcul
Inscription : juillet 2007
Messages : 659
Détails du profil
Informations personnelles :
Nom : Homme J-Pierre Catherine
Âge : 57
Localisation : France, Maine et Loire (Pays de la Loire)

Informations professionnelles :
Activité : Conception Calcul
Secteur : Industrie

Informations forums :
Inscription : juillet 2007
Messages : 659
Points : 1 856
Points : 1 856
Bonjour

à tout hasard
en remplacant 201110281445 Par *
Code :
Workbooks.OpenText Filename:=Chemin_Reseau & "TOTO.form.*." & Le_ID
Tu dis

Edit : Fonctionne en 2003
__________________
Jean-Pierre Pensez à Voter pour les réponses qui vous ont aidés, d'avance merci
---------Et n'oubliez pas de mettre : ..quand c'est le cas !---------
Jean-Pierre49 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/11/2011, 12h12   #3
Nouveau Membre du Club
 
Johan
Etudiant Miagiste en apprentissage (Master 2)
Inscription : avril 2011
Messages : 128
Détails du profil
Informations personnelles :
Nom : Johan
Localisation : France

Informations professionnelles :
Activité : Etudiant Miagiste en apprentissage (Master 2)

Informations forums :
Inscription : avril 2011
Messages : 128
Points : 27
Points : 27
Malheureusement Non
johan89 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/11/2011, 12h17   #4
Membre Expert
 
Avatar de Jean-Pierre49
 
Homme J-Pierre Catherine
Conception Calcul
Inscription : juillet 2007
Messages : 659
Détails du profil
Informations personnelles :
Nom : Homme J-Pierre Catherine
Âge : 57
Localisation : France, Maine et Loire (Pays de la Loire)

Informations professionnelles :
Activité : Conception Calcul
Secteur : Industrie

Informations forums :
Inscription : juillet 2007
Messages : 659
Points : 1 856
Points : 1 856
Peut être un problème avec 2002

Car avec 2003
Code :
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
Citation:
et tu ouvriras le premier fichier trouvé ( tu nous as pas dit s'il y en avait plusieurs ??)
Peut être un autre problème
__________________
Jean-Pierre Pensez à Voter pour les réponses qui vous ont aidés, d'avance merci
---------Et n'oubliez pas de mettre : ..quand c'est le cas !---------
Jean-Pierre49 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/11/2011, 12h32   #5
Responsable Visual Basic
 
Avatar de bbil
 
Inscription : juin 2003
Messages : 11 773
Détails du profil
Informations personnelles :
Âge : 45
Localisation : France, Ariège (Midi Pyrénées)

Informations forums :
Inscription : juin 2003
Messages : 11 773
Points : 16 849
Points : 16 849
Envoyer un message via Skype™ à bbil
bonjour,

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

Code :
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 ??)


bbil est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/11/2011, 13h13   #6
Rédacteur
 
Avatar de Ormonth
 
Homme Didier GONARD
Formateur Développeur Office - indépendant
Inscription : février 2008
Messages : 2 353
Détails du profil
Informations personnelles :
Nom : Homme Didier GONARD
Localisation : France, Loire Atlantique (Pays de la Loire)

Informations professionnelles :
Activité : Formateur Développeur Office - indépendant

Informations forums :
Inscription : février 2008
Messages : 2 353
Points : 4 685
Points : 4 685
Bonjour,

Citation:
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
__________________
Didier Gonard

Ps :
Pour noter positivement ou négativement un post, vous pouvez cliquer sur les pouces en bas à droite !
Tutoriels : Voir la liste de mes tutoriels et mon site pro sur ma Page DVP
N'oubliez pas de mettre : ..quand c'est le cas !
Ormonth est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 04/11/2011, 10h05   #7
Nouveau Membre du Club
 
Johan
Etudiant Miagiste en apprentissage (Master 2)
Inscription : avril 2011
Messages : 128
Détails du profil
Informations personnelles :
Nom : Johan
Localisation : France

Informations professionnelles :
Activité : Etudiant Miagiste en apprentissage (Master 2)

Informations forums :
Inscription : avril 2011
Messages : 128
Points : 27
Points : 27
Bonjour à tous,

Merci pour votre aide.
Le fichier est situé sur un ftp Linux.
TOTO.form.201110281445." & Le_ID
Le_ID étant un ID sur 9 caractères du genre 987654321.
En effet, j'ai plusieurs fichiers à traiter, c'est pour cela que j'ai besoin de faire "disparaître" la date (201110281445 pour l'exemple au dessus).
Mais ma problématique ne se pose que sur un fichier. Après, je n'aurais qu'à faire la même chose pour tous les fichiers.

Citation:
Peut être un problème avec 2002
Je suis sous 2003, même souci

Citation:
Tu peux utiliser dir pour trouver le nom complet de ton fichier
La macro bloque sur
Code :
StFichier = Dir (Chemin_Reseau & "TOTO.form.*." & Le_ID)


Citation:
Tu n'es pas sous Mac
Non, je suis sous Windows XP.


Peut-être que ça ne fonctionne pas parce qu'il y a l'ID à la suite de mon * non ? : TOTO.form.*." & Le_ID
johan89 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 04/11/2011, 10h21   #8
Responsable Visual Basic
 
Avatar de bbil
 
Inscription : juin 2003
Messages : 11 773
Détails du profil
Informations personnelles :
Âge : 45
Localisation : France, Ariège (Midi Pyrénées)

Informations forums :
Inscription : juin 2003
Messages : 11 773
Points : 16 849
Points : 16 849
Envoyer un message via Skype™ à bbil
Citation:
Envoyé par johan89 Voir le message
...
Le fichier est situé sur un ftp Linux.
..
Cela tu aurais pu le préciser dés le départ !

Dir ne fonctionne pas en ftp ..

tout ce complique si tu ne sais pas par calcul déterminer le nom du fichier à télécharger il va falloir trouver une autre méthode pour lister les fichiers du répertoire (API peu-être ..)



Citation:
Envoyé par johan89 Voir le message
..En effet, j'ai plusieurs fichiers à traiter, c'est pour cela que j'ai besoin de faire "disparaître" la date (201110281445 pour l'exemple au dessus)....
La question c'était pour savoir s'il pouvait avoir plusieurs fichiers répondant au même filtre .. (même préfixe, même ID , seule la date change ..)
bbil est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 04/11/2011, 10h48   #9
Nouveau Membre du Club
 
Johan
Etudiant Miagiste en apprentissage (Master 2)
Inscription : avril 2011
Messages : 128
Détails du profil
Informations personnelles :
Nom : Johan
Localisation : France

Informations professionnelles :
Activité : Etudiant Miagiste en apprentissage (Master 2)

Informations forums :
Inscription : avril 2011
Messages : 128
Points : 27
Points : 27
Désolé, je n'y avais pas pensé.
On est obligé de lister les fichiers ! il n'y a pas une syntaxe en vba qui permette de dire "n'importe quel caractère" lorsque l'on travaille sur des fichiers hébergés sous Linux ??
johan89 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 04/11/2011, 13h13   #10
Rédacteur
 
Avatar de Ormonth
 
Homme Didier GONARD
Formateur Développeur Office - indépendant
Inscription : février 2008
Messages : 2 353
Détails du profil
Informations personnelles :
Nom : Homme Didier GONARD
Localisation : France, Loire Atlantique (Pays de la Loire)

Informations professionnelles :
Activité : Formateur Développeur Office - indépendant

Informations forums :
Inscription : février 2008
Messages : 2 353
Points : 4 685
Points : 4 685
Bonjour,

Le même problème - essentiel - de non précision des informations utiles s'est déjà produit sur ce fil que tu as créé il y a quelques jours et sur le même sujet à la base :

http://www.developpez.net/forums/d11...on-partie-nom/

qui est toujours sans suite alors que celui-ci est ouvert...

Citation:
Envoyé par johan89
02/11/2011 - merci tout de même, je vais me pencher d'avantage sur le problème dès que j'ai le temps
!
__________________
Didier Gonard

Ps :
Pour noter positivement ou négativement un post, vous pouvez cliquer sur les pouces en bas à droite !
Tutoriels : Voir la liste de mes tutoriels et mon site pro sur ma Page DVP
N'oubliez pas de mettre : ..quand c'est le cas !
Ormonth est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/11/2011, 11h22   #11
Nouveau Membre du Club
 
Johan
Etudiant Miagiste en apprentissage (Master 2)
Inscription : avril 2011
Messages : 128
Détails du profil
Informations personnelles :
Nom : Johan
Localisation : France

Informations professionnelles :
Activité : Etudiant Miagiste en apprentissage (Master 2)

Informations forums :
Inscription : avril 2011
Messages : 128
Points : 27
Points : 27
Exact.
En se connectant en ftp, il y a peut être moyen que le caractère * soit "compris" ... Qu'en pensez-vous ?
johan89 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 13h03.


 
 
 
 
Partenaires

Hébergement Web