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

Question

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 !

cs_casy · Answer

"... 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 #

cs_DARKSIDIOUS · Answer

Dim TaVariable As String
TaVariable = "c:\Moi Y A Na Pas Comprendre.txt"

Open TaVariable For Output As #1
Close #1

Meiji Tenno · Answer

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.

econs · Answer

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.

Meiji Tenno · Answer

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:	oto\ (a).txt"
Open a For Output As #1
Close #1

Ca marche pas !

cs_DARKSIDIOUS · Answer

Non ca c'est sûr que ca ne risque pas marcher !

a =  table(1,3)

Dim  B  As String
B  = "c:	oto\" & B & ".txt"
Open B For Output As #1
Close #1

Meiji Tenno · Answer

Ah OK !, merci

cs_casy · Answer

Dark, ça non plus ça va pas marcher.

a =  table(1,3)

Dim  B  As String
B  = "c:	oto\" & a & ".txt"
Open B For Output As #1
Close #1

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

Meiji Tenno · Answer

oui, oui, j'avais corrigé

OCB37 · Answer

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.

cs_casy · Answer

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

OCB37 · Answer

Merci.
Une autre question si je veux verifier si le nom du fichier existe deja, quel est le code que je dois utiliser.

cs_casy · Answer

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

OCB37 · Answer

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.

cs_casy · Answer

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) ----

# LE PARTAGE EST NOTRE FORCE # http://aide-office-vba.monforum.com/index.php

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

15 réponses

Votre réponse

Discussions similaires