Come copiare il contenuto di un file di testo di un foglio di calcolo utilizzando VBA

macro di Microsoft Excel consente di automatizzare quasi ogni tipo di attività, aumentando la produttività e migliorare la vostra efficienza. Scritto in VBA , macro possono creare, modificare e rimuovere i dati all'interno di un foglio di calcolo. Inoltre , è possibile utilizzare le macro per afferrare le informazioni da un database esterno o di un file . Per importare dati da un file di testo manualmente , si dovrebbe aprire il file in un elaboratore di testi , copiare il suo contenuto e la incollarli in Excel . Se avete a che fare con molti file di testo , questo metodo può sembrare scoraggiante e noioso . Una semplice funzione VBA consente di automatizzare esso. Istruzioni
1

Avviare Microsoft Excel. Premere il tasto " Ctrl + N" per creare una nuova cartella di lavoro . Per utilizzare una delle vostre cartelle di lavoro , invece , premere il tasto " Ctrl + O ", selezionare il file e fare clic su "Apri ".
2

Comunicati "Alt + F8 " per aprire la finestra di dialogo Macro . Tipo " GetFromTextFile " nella casella Nome macro e quindi fare clic su "Crea ".
3

Inserisci il seguente codice nell'editor di VBA . Sostituire " C : \\ YOURTEXTFILE.txt ." Con la posizione esatta del file di testo che si desidera importare

Sub GetFromTextFile ( ) per

Dim sFile , WholeLine Come
String

Dim startCell come gamma

Dim c As Integer

Settembre = Chr ( 13 ) per

Application.ScreenUpdating = False

sFile = " C : \\ YOURTEXTFILE.txt "

Apri sFile Per Access Input letto come # 1

While Not EOF ( 1 ) per

Line Input # 1 , WholeLine

diritto ( WholeLine , 1) < > Settembre Poi

WholeLine = WholeLine & settembre