Microsoft Excel-makron kan hjälpa dig automatisera nästan alla typer av uppdrag , öka din produktivitet och förbättra din effektivitet . Skrivet i VBA , kan makron skapa , manipulera och ta bort data i varje kalkylblad . Dessutom kan du använda makron för att fånga information från en extern databas eller fil . Om du vill importera data från en textfil manuellt , skulle du behöva öppna filen i en ordbehandlare , kopiera innehållet och klistra in dem i Excel . Om du arbetar med många textfiler , kan denna metod verka skrämmande och långtråkig . En enkel VBA -funktionen kan hjälpa dig att automatisera det . Instruktioner
1
Starta Microsoft Excel. Tryck " Ctrl + N " för att skapa en ny arbetsbok . För att använda en av dina arbetsböcker i stället , tryck "Ctrl + O , " välj din fil och klicka sedan på " Öppna".
2
Tryck " Alt + F8 " för att öppna dialogrutan Makron . Typ " GetFromTextFile " i Makronamn rutan och klicka sedan på " Skapa ".
3
Skriv följande kod i VBA editorn . Ersätt " C : \\ YOURTEXTFILE.txt " . Den exakta platsen för textfilen som du vill importera
Sub GetFromTextFile ( ) katalog
Dim sfile , WholeLine As String
Dim startCell Som räckvidd
Dim c As Integer
september = Chr ( 13 ) katalog
Application.ScreenUpdating = False
sfile = " C : \\ YOURTEXTFILE.txt "
Open sfile För Input Åtkomst Läs Som # 1
Not EOF ( 1 ) katalog
Linjeinmatning # 1 , WholeLine
p Om höger ( WholeLine , 1 ) < > september Sen
WholeLine = WholeLine & september
End If
ActiveCell.NumberFormat = " @ "
ActiveCell.Value = WholeLine
ActiveCell.Offset ( 1 , 0 ) . Välj
Wend
Stäng # 1
End Sub
4
Tryck " Alt + Q " för att stänga VBA editorn och återgå till arbetsboken .
5
Tryck " Shift + F11 " för att skapa ett tomt kalkylblad .
6
Tryck " Alt + F8 " för att öppna dialogrutan Makron igen . Välj " Get FromTextFile " och klicka sedan på " Kör ". Detta kopierar innehållet i din textfil till det tomma arket .
