Jeg har et lille eksempel liggende. Jeg indlæser en txt-fil som jeg udvælger. Er det den samme fil du altid skal læse fra, kan du bare skrive filnavnet istedet for dir og filename
I eksemplet indlæser jeg flere variabler fra en fil sepereret med ;. Du kan nøjes med at læse de første 3 linier og dele ved : Så vil data(0) fra mit eksempel være <computer> og data(1) være Pentium II
Dim data() As String Dim txtfil As String
Open Replace(Dir1.Path & "\" & File1.FileName, "\\", "\") For Input As #1
Line Input #1, txtfil 'læser kun første linie i filen Close #1
'splitter txt filen op i de enkelte variabler Text1.Text = txtfil data = VBA.Split(txtfil, ";") Text2.Text = (data(0)) 'første variabel Text3.Text = (data(1)) 'anden variabel
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.