Créer un fichier texte du nom d'une variable

Meiji Tenno Messages postés 5 Date d'inscription mardi 22 novembre 2005 Statut Membre Dernière intervention 1 septembre 2006 - 31 août 2006 à 19:12
cs_casy Messages postés 7741 Date d'inscription mercredi 1 septembre 2004 Statut Membre Dernière intervention 24 septembre 2014 - 16 juin 2008 à 15:15
Bonjour à tous
Pour un programme, j'ai besoin de créer un fichier texte du nom d'une variable. J'ai essayé plusieurs méthodes mais aucune ne marche.
Est-ce que qqn sait si c'est possible et si oui, comment je peux faire.
Merci d'avance !

15 réponses

cs_casy Messages postés 7741 Date d'inscription mercredi 1 septembre 2004 Statut Membre Dernière intervention 24 septembre 2014 40
31 août 2006 à 19:20
"... du nom d'une variable ...", moi yana pas tout comprendre.

Le nom du fichier est le nom d'une variable de ton projet, ou il est contenu dans une variable de ton projet ?

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #
0
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 129
31 août 2006 à 20:01
Dim TaVariable As String
TaVariable = "c:\Moi Y A Na Pas Comprendre.txt"

Open TaVariable For Output As #1
Close #1
0
Meiji Tenno Messages postés 5 Date d'inscription mardi 22 novembre 2005 Statut Membre Dernière intervention 1 septembre 2006
1 sept. 2006 à 08:31
Ce que je voulais dire, c'est que une variable contient par exemple la chaîne "toto" et je voulais créer un fichier texte du nom de toto, dans un dossier quelconque.
0
econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Modérateur Dernière intervention 23 décembre 2008 23
1 sept. 2006 à 08:54
Alors c'est la solution proposée ci-dessus par Darksidious qu'il te faut.





Manu


--------------------------------------------------------------------------------------------
Avant de poster un message, n'oubliez pas de consulter le reglement.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Meiji Tenno Messages postés 5 Date d'inscription mardi 22 novembre 2005 Statut Membre Dernière intervention 1 septembre 2006
1 sept. 2006 à 11:44
Ca d'accord, je sais faire, mais ma variable est contenue dans une cellule de base de donnée du genre : Dim table(1 To 1000, 1 To 3) As String.
ma variable s'appelle a et se strouve comme ci-dessous :
a = table(1,3)
Or si je fais :

Dim a As String
a = "c:\toto\ (a).txt"
Open a For Output As #1
Close #1

Ca marche pas !


 


 
0
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 129
1 sept. 2006 à 11:45
Non ca c'est sûr que ca ne risque pas marcher !

a = table(1,3)

Dim B As String
B = "c:\toto\" & B & ".txt"
Open B For Output As #1
Close #1
0
Meiji Tenno Messages postés 5 Date d'inscription mardi 22 novembre 2005 Statut Membre Dernière intervention 1 septembre 2006
1 sept. 2006 à 11:47
Ah OK !, merci
0
cs_casy Messages postés 7741 Date d'inscription mercredi 1 septembre 2004 Statut Membre Dernière intervention 24 septembre 2014 40
1 sept. 2006 à 11:50
Dark, ça non plus ça va pas marcher.

a = table(1,3)

Dim B As String
B = "c:\toto\" & a & ".txt"
Open B For Output As #1
Close #1

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #
0
Meiji Tenno Messages postés 5 Date d'inscription mardi 22 novembre 2005 Statut Membre Dernière intervention 1 septembre 2006
1 sept. 2006 à 12:13
oui, oui, j'avais corrigé
0
OCB37 Messages postés 3 Date d'inscription lundi 16 juin 2008 Statut Membre Dernière intervention 24 juin 2008
16 juin 2008 à 13:53
Je relance le sujet, en fait moi mon fichier doit avoir cette tournure :
fichier = "C:\Transfert\facture " & DateDebut & "" & Datefin & ".pnm"

DateDebut et DateFin sont deux champs du formulaires.

Avec cette ligne le fichier est bien crée cependant il porte comme nom seulement Facture.

Merci.
0
cs_casy Messages postés 7741 Date d'inscription mercredi 1 septembre 2004 Statut Membre Dernière intervention 24 septembre 2014 40
16 juin 2008 à 14:08
Tu ne peut pas utiliser le caractère / dans un nom de fichier, il faut le remplacer.

fichier = "C:\Transfert\facture " & Replace(DateDebut,"/","-") & "" & Replace(Datefin,"/","-") & ".pnm"

---- Sevyc64  (alias Casy) ---- <hr size ="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php
0
OCB37 Messages postés 3 Date d'inscription lundi 16 juin 2008 Statut Membre Dernière intervention 24 juin 2008
16 juin 2008 à 14:23
Merci.
Une autre question si je veux verifier si le nom du fichier existe deja, quel est le code que je dois utiliser.
0
cs_casy Messages postés 7741 Date d'inscription mercredi 1 septembre 2004 Statut Membre Dernière intervention 24 septembre 2014 40
16 juin 2008 à 14:32
La fonction Dir devrait faire l'affaire, je pense.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php
0
OCB37 Messages postés 3 Date d'inscription lundi 16 juin 2008 Statut Membre Dernière intervention 24 juin 2008
16 juin 2008 à 14:59
Je ne comprend pas trop comment faire, en fait si le fichier existe deja je veux que l'utilisateur confirme ou non d'écraser ce fichier.
Ainsi il faut que je regarde sile nom du fichier que je vais crée existe deja dans le repertoire c:/transferts/ . Je ne comprend pas trop comment faire avec la fonction dir.
0
cs_casy Messages postés 7741 Date d'inscription mercredi 1 septembre 2004 Statut Membre Dernière intervention 24 septembre 2014 40
16 juin 2008 à 15:15
Je crois que c'est un truc du genre Si Dir(TonFichier)<>"" alors ton fichier existe.

Regarde dans l'aide pour plus d'info

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php
0
Rejoignez-nous