Jeg er meget nybegynder..
hvis der i en txt fil er 10 linier
hvordan kan man så bare læse linie 5 feks
//soNNe
Her er måske noget du kan bruge eller bygge videre på.
Private Sub Command1_Click()
Dim strfile, buf As String
Dim size, pos As Long ' bliver ikke brugt
tal = 1
strfile = "c:\\test.txt"
Open strfile For Input As #1
Do Until EOF(1) ' Åben filen og læs alle linjere, og luk filen igen
Line Input #1, buf
Debug.Print buf
If tal = 5 Then 'skriv tal for linie den skal stoppe på
End
End If
tal = tal + 1
Loop
Close #1
End Sub
Mickey