données externe

[deni29]

Bonjour à tous,

Je souhaiterai dans un Fichier xls, récupérer via une macro une valeur, toujours la dernière, (le N° '205' dans le fichier joint), à partir d'un fichier xxx.prn, (fichier qui s'ouvre comme un txt).Il y aurait-il une solution, si possible sans ouvrir le fichier xxx.prn

@+

Deni29 [file name=Data_20060502104530.zip size=129]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Data_20060502104530.zip[/file]

 

[Hervé]

Bonjour


a essayer :

Dim tablo
Dim ligne As String

Open 'C:\data.prn' For Input As #1 ' a adapter
Do While Not EOF(1)
        Line Input #1, ligne
        tablo = Split(ligne, ' ')
Loop
Close #1

MsgBox tablo(UBound(tablo) - 1) ' a adapter

salut

 

[Deni29]

Bnoujour Hervé,


Merci beaucoup pour cette macro cela fonction tres bien.

@+

deni29