Hvordan lese fra en tekstfil i Excel VBA
Lese en tekstfil er noe en datamaskin programmerer må vite hvordan du skal gjøre når du utvikler dataprogrammer. I VBA kan du bruke "Input #" statement å åpne en tekstfil og lese innholdet. Dataene som leses fra filen er lagret i minnet for deg å manipulere som du ønsker. Bruke VBA å lese en tekstfil er nyttig når du trenger å overføre store mengder data til et Excel-regneark.
Bruksanvisning
1 Klikk på "Utvikler" fanen, klikk på "Visual Basic" og klikk på "Insert" -menyen. Velg "Module" å sette inn en ny kode modul.
2 Start med å lage en sub-prosedyren ved hjelp av følgende kode:
Private Sub readTextFile ()
3 Lag tre variablene du vil bruke for å lese tekstfilen:
Dim fileText As String
Dim myTextFile As String
Dim memFile As Integer
4 Definer banen og filnavnet på tekstfilen du ønsker å lese:
myTextFile = "F: \ temp.txt"
memFile = Freefile
5 Åpne filen, lese innholdet og lukk filen:
Åpne myTextFile For Input As #memFile
fileText = Input $ (LOF (1), 1)
Lukke
6 Vise tekstfil resultater gjennom det gjeldende vinduet.
Debug.Print (fileText)
7 Avslutt sub-prosedyren ved å skrive "End Sub" (uten anførselstegn). Trykk F5 for å kjøre prosedyren og lese filen.