open "bob.txt" for input as #1
do while not eof(1)
i = i + 1
input #1, valeur
if i = ligne then exit do
loop
close #1
Msgbox "Ligne : " & Ligne & chr(10) & "Valeur : " & valeur
open "bob.txt" for input as #1
do while not eof(1)
i = i + 1
input #1, valeur
if i = ligne then exit do
loop
close #1
Msgbox "Ligne : " & Ligne & chr(10) & "Valeur : " & valeur