Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
789 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VB6 - VBA] Write #1, var1, var2...

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VB6 - VBA] Write #1, var1, var2...

n°963509
harelde
Posté le 27-01-2005 à 11:03:30  profilanswer
 

Salut à tous,
 
Un p'tit soucis :
Je veux écrire dans un fichier TXT ou XLS, le contenu de N variables.
N est inconnu jusqu'au moment de l'écriture.
 
Comment puis je coder le write dans ce cas ?
Car je ne peux pas écrire :
 
Select Case NbVar

mood
Publicité
Posté le 27-01-2005 à 11:03:30  profilanswer
 

n°963514
harelde
Posté le 27-01-2005 à 11:05:59  profilanswer
 

Chiotte...
Fausse manip.
 
Voir la fin de mon message dans ce second post :
 
Je ne peux pas écrire :
 
Select Case NbVar
  Case 1
    write #1, var1
  Case 2
    write #1, var1, var2
...etc
 
NbVar étant compris entre 1 et 255 (byte), c'est une méthode impensable.
Avez vous une idée à me soumettre ?
 
Merci
 
Laurent
 
 

n°963517
drasche
Posté le 27-01-2005 à 11:09:23  profilanswer
 

Une boucle?


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
n°963549
harelde
Posté le 27-01-2005 à 11:30:09  profilanswer
 

OK...
Mais comment tu la code cette boucle ??
C'est là mon pbe !
 
Car il faudra toujours appeler la fonction "write" et balancer à sa suite les N variables.
 
J'ai beau retourner le pbe, je ne vois pas comment m'en sortir.
 

n°963568
drasche
Posté le 27-01-2005 à 11:39:06  profilanswer
 

tes variables sont nommées var1, var2, var3, etc. ?
 
Il est là ton problème, fais un tableau, ça sera beaucoup plus facile.


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
n°963576
harelde
Posté le 27-01-2005 à 11:44:19  profilanswer
 

Non, non... var1, var2... c'était pour l'exemple.
Bon admettons. Je fais un tableau :  
 
dim tab() as string
...
redim tab(NbVar)
 
for i = 1 to nbvar  
  tab(i) = ...
next i
 
et ensuite ?
comment écris tu les enregistrements non vides du tableau ?
 
(j'vois pas comment tu veux procéder)

n°963585
drasche
Posté le 27-01-2005 à 11:49:04  profilanswer
 

ben je fais une boucle sur le Write
 
Write #1, tab(i)
 
pis voilà.


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
n°963595
harelde
Posté le 27-01-2005 à 11:51:13  profilanswer
 

Sans dec ?
Ca marche ce truc ?
Dans ce cas, mon pbe va etre super simple à régler.
 
Je tente ça tout de suite.
 
Merci
 
Laurent

n°963615
harelde
Posté le 27-01-2005 à 12:05:40  profilanswer
 

Et ben non !
Ca ne marche pas.
 
Avec cette méthode, je change de ligne à chaque write.
Ce que je veux, c'est toutes les variables sur la même ligne avec un séparateur entre elles. Et changer de ligne à l'itération suivante (nouvelle série de variables).
 
Si je me fais bien comprendre
 
Un truc dans le genre :
1var1, 1var2, 1var3...
2var1, 2var2, 2var3...
...
 
Et non
1var1
1var2
1var3
...
2var1
2var2
2var3
...
...
 

n°963641
drasche
Posté le 27-01-2005 à 12:32:47  profilanswer
 

dans ce cas, utilise Join pour fusionner tous les éléments de ton tableau en une seule string, tu n'auras qu'un write à faire de cette string :spamafote:


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
mood
Publicité
Posté le 27-01-2005 à 12:32:47  profilanswer
 

n°963692
harelde
Posté le 27-01-2005 à 13:29:33  profilanswer
 

Ouaip...
Et ben non !
Car dans ce cas, je n'ai qu'une variable et non N.
Quand j'importe sous Excel, j'ai toute ma ligne qui se retrouve dans la même cellule. Au lieu d'avoir une variable par colonne.
 
Je sais...
Moi aussi les bras m'en tombe.
Ca parait tout simple, et quand on y réfléchit, je ne suis pas sur que cela soit faisable.
 
:-((

n°963821
betsamee
Asterisk Zeperyl
Posté le 27-01-2005 à 16:12:48  profilanswer
 

meme si tu separes tes variables par des ; ?

n°963833
harelde
Posté le 27-01-2005 à 16:29:21  profilanswer
 

ben vouaip...
 
dans ma cellule Excel, j'ai un truc du genre :
"usqdvs;jshdsq;jdshvds;shzsvgq;toto"
Le tout regroupé dans la première cellule de la colonne.
Type fichier .CSV
 
Voila... c'est un bon résumé : j'obtient un format CSV.
Je voudrais du XLS.
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VB6 - VBA] Write #1, var1, var2...

 

Sujets relatifs
[VBA] Equivalent du break en C[VBA] Changer [b]toto[/b] en toto gras
Variable dans boucle VBA ExcelRTE 50290 sous VBA
[VB6] [Débutant] Tester la Validité des InformationsPolice par défaut dans VBA
[résolu][VBA][Access] Form et boutons en fonction d'une requêteVB6 problème empaquetage
utiliser des requêtes Access dans VBA[VB6] Nbre d'enregistrements dans un Recordset
Plus de sujets relatifs à : [VB6 - VBA] Write #1, var1, var2...


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR