[VBA - E] - Ouverture d'un fichier .txt

Version imprimable

13/06/2006, 11h16
jimbololo

[VBA - E] - Ouverture d'un fichier .txt
bonjour à tous !

j'aimerais ouvrir un fichier .txt à partir d'excel...
j'ai parcouru les sujets de forum, la faq et les tutos, j'ai trouvé sa :
Code:

1 2 Shell ("Y:\ABATTAGE\testlecture.txt")
mais sa me dit que la procédure est incorrecte !, j'ai vu qu'il y avait aussi la fonction Open mais je ne trouve pas d'aide pour celle ci dans EXCEL, est-ce que s'est une fonction VB ? utilisable sous VBA ?

j'ai essayé sa :
Code:

1 2 3 4 5 dim test as ... Open "Y:\ABATTAGE\testlecture.txt" For Random As test
mais sa ne marche pas non plus! sa mefait nom ou numéro de fichier incorrect
je ne sais pas quel type de déclaration je dois faire pour test

pouvez vous m'aider ??? svp :(
13/06/2006, 13h00
illight

Pourquoi n'utilise tu pas simplement un :

Code:

workbooks.Open "C:\fichiertxt.txt"

Regarde dans l'aide pour plus d'informations :)

nan en fait c'est bon j'ai regardé dans des anciens sujets du forums, et j'ai cherché la méthode pour lire un fichier .txt, en fait j'ai eu les 2 réponses en même temps :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
    fichier = "Y:\ABATTAGE\porc.txt"
    Open fichier For Input As #texte
    While Not EOF(texte)
        Line Input #texte, ligne1
        taille = Len(ligne1)
        date1 = Mid(ligne1, 1, 8)
        numab = Mid(ligne1, 9, 2)
        numordre = Mid(ligne1, 11, 5)
        frappe = Mid(ligne1, 16, 5)
        numop = Mid(ligne1, 21, 3)
        tvm = Mid(ligne1, 24, 4)
        type1 = Mid(ligne1, 28, 1)
        poids1 = Mid(ligne1, 29, 4)
        reflectance = Mid(ligne1, 33, 3)
        forcage = Mid(ligne1, 36, 1)
 
 
    Wend
    Close #texte

merci a toi illight ;) !