Discussion :

[bdoux33]

Bonjour,

voici mon problème: j'enregistre le chemin et le nom d'un fichier texte (txt1) sur lequel je fais quelque transformation via excel, et je souhaite générer un nouveau fichier texte(txt2) contenant les transformations faites sur txt1. Mais j'aimerais que le nom de txt2 soit différent de txt1 mais qu'il garde le même chemin que txt1.

voici ce que j'aimerais avoir:

Code :

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

1
2
3
4
dim chemin1 as string
dim chemin2 as string
 
chemin1="c:\repertoire\txt1.txt"

et je voudrais que chemin2="c:\repertoire\[HEXA]txt1.txt"

Si vous avez des suggestion je suis preneur.

[cafeine]

Hello,

voici une piste

Code :

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

1
2
3
chemin1="c:\repertoire\txt1.txt"
?left(chemin1, instrrev(chemin1, "\")) & "[HEXA]" & mid(chemin1, instrrev(chemin1,"\")+1)
c:\repertoire\[HEXA]txt1.txt

[aalex_38]

La réponse de cafeine est complète mais j'aimerai poser une question

Et pourquoi pas modifier tes définitions ?!?:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Const MonRep as string = c:\repertoire\
const MonHex as string = "[HEXA]" 
dim Chemin1 as string, chemincomplet1 as string
dim chemin2 as string, chemincomplet2 as string
 
' valorisation du premier nom
chemin1="txt1.txt"
chemincomplet1 = monrep & chemin1
 
'valorisation du deuxieme nom 
chemincomplet2 = monrep & monhex & chemin1

[bdoux33]

Merci cafeine, ça marche parfaitement.

aalex_38 => le répertoire du fichier à modifier est choisi par l'utilisateur, donc il n'est pas fixe.

[aalex_38]

aalex_38 => le répertoire du fichier à modifier est choisi par l'utilisateur, donc il n'est pas fixe.

Ok puisque tu le recupère il te suffit d'adapter un peu le code que je donnais en exemple.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim MonRep as string 
const MonHex as string = "[HEXA]" 
dim Chemin1 as string, chemincomplet1 as string
dim chemin2 as string, chemincomplet2 as string
 
' MonRep est valorisé dans le code
' MonRep = ....
 
' valorisation du premier nom
chemin1="txt1.txt"
chemincomplet1 = monrep & chemin1
 
'valorisation du deuxieme nom 
chemincomplet2 = monrep & monhex & chemin1