Microsoft Excel- macro's kunnen helpen bij het automatiseren bijna elk soort taak, het verhogen van uw productiviteit en het verbeteren van uw efficiëntie . Geschreven in VBA , kunnen macro's maken , manipuleren en gegevens te verwijderen binnen een spreadsheet . Daarnaast kunt u macro's gebruiken om informatie te pakken van een externe database of bestand. Om gegevens uit een tekstbestand handmatig importeren , zou je het bestand te openen in een tekstverwerker , kopieert de inhoud en de pasta ze in Excel . Als u te maken met veel tekst bestanden , kan deze methode lijkt ontmoedigend en vervelend . Een eenvoudige VBA- functie kan u helpen bij het automatiseren . Instructies
Start Microsoft Excel 1 . Druk op " Ctrl + N " om een nieuwe werkmap te maken . Om een van uw werkmappen in plaats daarvan gebruiken, druk "Ctrl + O ", selecteer het bestand en klik op 'Openen'.
2 Druk " Alt + F8 " om het dialoogvenster Macro's te openen . Type " GetFromTextFile " in het vak Macro en klik vervolgens op "Create . "
3 Voer de volgende code in de VBA- editor . Vervang " C : \\ YOURTEXTFILE.txt " . Met de exacte locatie van het tekstbestand dat u wilt importeren Sub GetFromTextFile ( ) op Dim sFile , WholeLine als Koord
> Dim startCell als Waaier Dim c
als Geheel september = Chr
( 13 ) op Application.ScreenUpdating = False sFile
= " C : \\ YOURTEXTFILE.txt " Open sFile
Voor Input Access Lees Zoals # 1
While Not EOF ( 1 ) Line Input beelden # 1 , WholeLine
Als rechts ( WholeLine , 1 ) < > september dan
WholeLine = WholeLine & september End
Als ActiveCell.NumberFormat
= " @ "
ActiveCell.Value = WholeLine ActiveCell.Offset
( 1 , 0 ) . Kies Wend
Close # 1 End of Sub
< br > Druk op ' Alt + Q " 4 op de VBA -editor te sluiten en terug te keren naar uw werkmap .
5 Druk op " Shift + F11 " naar een leeg blad te maken .
Druk op ' Alt + F8 "om het dialoogvenster Macro weer open 6 . Selecteer " Get FromTextFile " en klik op "Uitvoeren . " Dit kopieert de inhoud van uw tekstbestand op de blanco blad .
|
