Microsoft Excel-makroer kan hjælpe dig med at automatisere næsten enhver type opgave , øge din produktivitet og forbedre din effektivitet . Skrevet i VBA , kan makroer oprette, manipulere og fjerne data inden for nogen regneark. Derudover kan du bruge makroer til at få fat i oplysninger fra en ekstern database eller fil. Hvis du vil importere data fra en tekstfil manuelt , ville du nødt til at åbne filen i et tekstbehandlingsprogram, kopiere dens indhold og indsætte dem i Excel. Hvis du beskæftiger dig med mange tekstfiler , kan denne metode virke skræmmende og trættende. En simpel VBA -funktionen kan hjælpe dig med at automatisere den. Instruktioner
1

Start Microsoft Excel. Tryk på " Ctrl + N " for at oprette en ny projektmappe . Hvis du vil bruge en af ​​dine projektmapper i stedet , skal du trykke "Ctrl + O ", vælge din fil , og klik derefter på "Åbn".
2

Tryk " Alt + F8 " for at åbne dialogboksen Makroer . Type " GetFromTextFile " i boksen Makronavn og derefter klikke på "Opret ".
3

Indtast følgende kode i VBA editoren . Erstat " C: \\ YOURTEXTFILE.txt " . Med den nøjagtige placering af den tekstfil, du ønsker at importere

Sub GetFromTextFile ()

Dim $ file , WholeLine As String
< p > Dim startCell Som Range

Dim c As Integer

september = Chr (13)

Application.ScreenUpdating = False

$ file = " C: \\ YOURTEXTFILE.txt "

Open $ file For Input Adgang Læs Som # 1

Ikke EOF (1)

linjeindgangs # 1, WholeLine
p Hvis Right ( WholeLine , 1 ) < > september Så

WholeLine = WholeLine & september

End If

ActiveCell.NumberFormat = " @ "

ActiveCell.Value = WholeLine

ActiveCell.Offset (1, 0) . Vælg

Wend

Close # 1

End Sub
< br > 4

Tryk på " Alt + Q " for at lukke VBA editor og vende tilbage til din projektmappe .
5.

Tryk på " Shift + F11 " for at oprette et tomt ark .
6

Tryk på " Alt + F8 " for at åbne dialogboksen Makroer igen. Vælg "Get FromTextFile ", og klik derefter på " Run ". Dette kopierer indholdet af din tekstfil til den tomme ark.