Simplification de l'utilisation de "convertir"

Bonjour,

j'ai le code :

Code:

---

1 2 3

Open chemin for append as cible# Print #cible, environ ("username"), date close #cible

---

Actuellement, je l'envoie vers un fichier .xls, mais dans la colonne A, ça me donne le environ(username"), quelques espaces et ensuite la date.

Question : Ne pourrais-je pas avoir en colonne A, le environ("username") et en colonne B, la date ?

Merci,
A+

Citation:

---

Envoyé par ericdev67

Actuellement, je l'envoie vers un fichier .xls,

---

Rien compris...

Quel rapport entre l'écriture dans un fichier texte et un classeur Excel?

Merci AlainTech,

En fait, je souhaite récupérer le nom et la date d'ouverture d'un fichier excel.

Dans le forum, j'ai trouvé ce code qui envoie les infos vers un fichier .txt (exemple "log.txt")

J'ai essayé en faisant "log.xls" et ça fonctionne, le seul soucis est qu'il faut que je convertisse ensuite le fichier avec excel (Données/convertir) pour avoir en colonne A le nom, et dans la colonne B, la date.

Et je souhaitais savoir si je ne pouvais pas éviter la convertion en mettant directement dans le code : colonne A (username), colonne B (date)

Merci
A+

Bonjour

Pas sûr d'avoir compris non plus !

S'il s'agit de récupérer dans un tableau Excel une donnée de ton fichier texte, le séparateur généralement utilisé est le point-virgule... donc :

Code:

---

Print #cible, environ ("username") & ";" & date

---

Dans ce cas, les démarches doivent être:
Créer un classeur (une fois pour toute, "à la main").
Ouvrir ce classeur
Repérer la première ligne vide
Ecrire tes données dans les 2 premières cellules de cette ligne
Fermer le classeur (en le sauvant).

Pour toutes ces actions, une petite recherche sur le forum devrait te donner des pistes.

Petite info supplémentaire:
Ce n'est pas parce qu'on donne l'extension .xls à un fichier qu'il en devient automatiquement un classeur Excel

Bonjour AlainTech et ucfoutu,

Je sais pas toujours très clair.....Néanmoins, j'ai résolu mon problème : j'ai créé un code qui converti le texte exemple "eric 07/04/08" et met, colonne A "eric" et colonne B "07/04/08", c'est ce que je recherchais, mais je pensais qu'à la création de "print #cible....", je pouvais le faire directement....

Le code :

Code:

---

1 2 3 4

Columns("A:A").Select Selection.TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, _ FieldInfo:=Array(Array(0, 1), Array(13, 1), Array(24, 1)), TrailingMinusNumbers _ :=True

---

Merci quand même,
A+ pour de prochaines aventures....:aie: