Hejsan nya korkade frågor. kan man på något enkelt sätt ta reda på antal rader i en text fil? typ: Om det är lika många tecken / rad så är det lätt. Exempelvis det är ALLTID 39 tecken per radTa reda på antal rader i fil.
X = len ("text.txt") eller något sånt..Sv: Ta reda på antal rader i fil.
Rader = Lof(1) / 39
Om du däremot har skiftande längd måste du tyvärr loopa igenom filen för att se hur många rader det är.
Do while not eof(1)
line input #1, tmp
rader = rader + 1
Loop
Du kan också använda (split) kommandot om det är så att du har separerat varje rad med exempelvis vbCrLf - chr(13) + chr(10). I detta fall måste det vara konsekvent annars räknar den fel.
filen = input(1, lof(1))
tmp = split(filen, vbCrLf)
rader = ubound(tmp)
Hoppas det ger dig råd till hur du kan tänkas göra
/Pelle