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

Signaler
Messages postés
5
Date d'inscription
mardi 22 novembre 2005
Statut
Membre
Dernière intervention
1 septembre 2006
-
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
-
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

Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
"... 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 #
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
133
Dim TaVariable As String
TaVariable = "c:\Moi Y A Na Pas Comprendre.txt"

Open TaVariable For Output As #1
Close #1
Messages postés
5
Date d'inscription
mardi 22 novembre 2005
Statut
Membre
Dernière intervention
1 septembre 2006

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.
Messages postés
4030
Date d'inscription
mardi 13 mai 2003
Statut
Modérateur
Dernière intervention
23 décembre 2008
22
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.
Messages postés
5
Date d'inscription
mardi 22 novembre 2005
Statut
Membre
Dernière intervention
1 septembre 2006

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 !


 


 
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
133
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
Messages postés
5
Date d'inscription
mardi 22 novembre 2005
Statut
Membre
Dernière intervention
1 septembre 2006

Ah OK !, merci
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
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 #
Messages postés
5
Date d'inscription
mardi 22 novembre 2005
Statut
Membre
Dernière intervention
1 septembre 2006

oui, oui, j'avais corrigé
Messages postés
3
Date d'inscription
lundi 16 juin 2008
Statut
Membre
Dernière intervention
24 juin 2008

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.
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
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
Messages postés
3
Date d'inscription
lundi 16 juin 2008
Statut
Membre
Dernière intervention
24 juin 2008

Merci.
Une autre question si je veux verifier si le nom du fichier existe deja, quel est le code que je dois utiliser.
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
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
Messages postés
3
Date d'inscription
lundi 16 juin 2008
Statut
Membre
Dernière intervention
24 juin 2008

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.
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
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