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.