VBA append to existing text file Excel Macros Examples Codes

Home/VBA/VBA append to existing text file Excel Macros Examples Codes

VBA code to VBA append to existing text file Excel Macros Examples for writing to text files using VBA in MS Office Word, PowerPoint, Access, Excel 2003, 2007, 2010, 2013 and VBScript. This Example VBA Program and function will help you to know how to append a text file using Excel VBA.

PREMIUM TEMPLATES LIMITED TIME OFFER

ON SALE80% OFF

BROWSE ALL TEMPLATES

50+ Project Management Templates Pack
Excel PowerPoint Word

VIEW DETAILS

Advanced Project Plan & Portfolio Template
Excel Template

VIEW DETAILS

Ultimate Project Management Template
Excel Template

VIEW DETAILS

20+ Excel Project Management Pack
Excel Templates

VIEW DETAILS

20+ PowerPoint Project Management Pack
PowerPoint Templates

VIEW DETAILS

10+ MS Word Project Management Pack
Word Templates

VIEW DETAILS


vba append to existing text file

Appending an existing text file Using VBA

Here is the Procedure, Example VBA Syntax and Example VBA Macro code for Appending an existing text file in Excel VBA. This will help you to know how to append a text file and add data using VBA.

VBA append to existing text file: Procedure

We will first open the text file as Append file with a file number. Then we will add the data to the file using File Number.

VBA append a text file: Syntax

Here is the VBA code and syntax for Appending an existing text file Using VBA. Use the Append keyword to open text file in appending mode.

strFile_Path = "Your file Path"
Open strFile_Path For Append As #1
Write #1, “You can write your required text here”

VBA to Append existing text file: Example Macro Code

Following is the sample Excel Macro to write to a text file by appending it using Excel VBA.

Sub VBA_to_append_existing_text_file()
    Dim strFile_Path As String
    strFile_Path = "C:\temp\test.txt" ‘Change as per your test folder and exiting file path to append it.
    Open strFile_Path For Append As #1
    Write #1, "This is my sample text"
    Close #1
End Sub 

Instructions to run the VBA Macro code to append a text file

Please follow the below steps to execute the VBA Code to Append an existing text file using Excel VBA Editor.

Step 1: Open any Excel workbook

[ To Open MS Excel: Go to Start menu, All programs and select Excel from MS Office OR You can simply type excel in the run command (Press Windows+ r key to open run dialog)] Step 2: Press Alt+F11 to open the VBA Editor [You can also open the VBE from the Developer Tab in the Excel ribbon] Step 3: Insert a code module [Go to insert menu in the VBE and then press Module OR Simply press the Alt+i then m to insert code module] Step 4: Copy the above Example Macro code and paste in the code module which have inserted in the above step
Step 5: Change the folder path as per your testing folder structure and existing file path.
Step 6: Now press the F5 to Run and Execute the Macro.
You can press the F8 to debug the macro line by line and see the result immediately.

Once you are done with the macro execution, now you can observe that a text file in the test folder. And the text file in the folder is appended with the data which you have mentioned in the code.

VBA Code to Append an existing text file – Macro Explained

Here is the detailed explanation of the Excel macro to append a text file using VBA.

  • Starting the program and sub procedure to write VBA Code to Append an existing text file and adding the data.
  • Declaring the strFile_Path variable as String Data Type to store the text file path.
  • Assigning the Existing File path to the variable strFile_Path.
  • Opening the text file for Append with FileNumber as 1.
  • Writing to the sample text to the File using FileNumber and Write Command.
  • Closing the File using FileNumber.
  • Ending the Sub procedure to write VBA Code to Append an existing text file and updating the data.

Here is the commented macro code for writing to text file and append it using VBA.

‘Starting the program and sub procedure to write VBA code to write the data to a text file Append.
Sub VBA_to_append_existing_text_file()

‘Declaring the strFile_Path variable as String Data Type to store the text file path.
Dim strFile_Path As String

‘Assigning the Existing File path to the variable strFile_Path.
strFile_Path = “C:\temp\test.txt”

‘Opening the text file for Append with FileNumber as 1.
Open strFile_Path For Append As #1

‘Writing to the sample text to the File using FileNumber and Write Command.
Write #1, “This is my sample text”

‘Closing the File using FileNumber.
Close #1

End Sub
‘Ending the Sub procedure to write VBA Code to append the data in existing text file.

LIMITED TIME OFFER - Get it Now!
Advanced Project Plan Excel Template

 
Related Resource External VBA Reference
By |October 20th, 2014|VBA|4 Comments

About the Author:

PNRao is a passionate business analyst and having close to 10 years of experience in Data Mining, Data Analysis and Application Development. This blog is his passion to learn new skills and share his knowledge to make you expertise in Data Analysis (Excel, VBA, SQL, SAS, Statistical Methods, Market Research Methodologies and Data Analysis Techniques).

4 Comments

  1. Eric June 18, 2015 at 3:14 PM - Reply

    Does anyone have a solution of how to capture the content on a cell (say a1) instead of “This is my sample text”?

    • Eric June 18, 2015 at 8:24 PM - Reply

      No worries….worked it out….Range(“A!”)….
      Thanks for forum. Great code

  2. Rick February 23, 2016 at 3:12 AM - Reply

    I am getting the string in quotes i.e “my text here” . How do I remove that so that I just have ‘my text here’ in the text file?

    • Jeremy May 19, 2016 at 3:23 PM - Reply

      You need to use “Print” instead of “Write”

      i.e. Instead of
      strFile_Path = “Your file Path”
      Open strFile_Path For Append As #1
      Write #1, “You can write your required text here”

      Use
      strFile_Path = “Your file Path”
      Open strFile_Path For Append As #1
      Print #1, “You can write your required text here”

Leave A Comment

This site uses Akismet to reduce spam. Learn how your comment data is processed.