VBA Open Text Files using OpenTextFile method of file system object Let us see example in the following tutorial.
Add Reference: Microsoft scripting Runtime
Please click on following link to know about how to add reference of Microsoft scripting Runtime.
Create Microsoft Scripting Runtime Library Reference
VBA Open a Text File in Output Mode
Here is an example to open a Text File in Output Mode.
'VBA Open Text Files in Excel Sub VBAF1_Open_TextFile() 'Variable declaration Dim sFile As String Dim ifileNumber As Integer 'Specify text file path to open sFile = "C:\VBAF1\FirstTextFile.txt" 'Assign a unique file number fileNumber = FreeFile 'Open text file in output mode Open sFile For Output As #fileNumber End Sub
VBA Open Text File in Notepad for Reading
You can find following example to Open Text File for Reading using Excel VBA. Here we use VBA OpenTextFile method of File system object to open text file.
'VBA OpenTextFile for Reading Sub VBAF1_To_Open_TextFile_For_Reading() 'Variabledeclaration Dim oFSO As New Filesystemobject Dim sFile As String Dim myTextStream As TextStream 'Specify text file path to open sFile = "C:\VBAF1\FirstTextFile.txt" 'Open text file to read Set myTextStream = oFSO.OpenTextFile(sFile, ForReading, False, TristateFalse) 'Print text file data in immediate window Debug.Print myTextStream.ReadLine 'Close opened text file. myTextStream.Close End Sub
Output: Here is screenshot for your reference. You can see output in the immediate window.
Instructions to Run VBA Macro Code or Procedure:
You can refer the following link for the step by step instructions.
Instructions to run VBA Macro Code
Other Useful Resources:
Click on the following links of the useful resources. These helps to learn and gain more knowledge.
VBA Tutorial VBA Functions List VBA Arrays VBA Text Files VBA Tables
VBA Editor Keyboard Shortcut Keys List VBA Interview Questions & Answers Blog