Create txt file with Excel VBA macro Solved

Question

Hello,
I would like to create an Excel macro that creates a txt file containing the content of a cell from the Excel project.
And that it is opened at the same time.
Thank you in advance.

Configuration: Windows 7 / Firefox 15.0.1

f894009 · Accepted Answer

Hello,  Sub create_TXT() Close path = "C:\directory" Open path & "File.txt" For Output As #1 Print #1, Worksheets("Sheet1").Range("A1") Close End Sub   And that it be opened at the same time.

HoodRide · Answer

Hello Laurent75_

There is a solution that involves putting column A into an array initially and then writing to the txt file from the array:

 Dim Path As String Dim LastRow As Long 'Index of the last row Dim Array() As Variant Dim Row As Long Path = "C:\VBA\" LastRow = Range("A1").SpecialCells(xlCellTypeLastCell).Row 'Creating the array through a loop Row = 1 Do While Row <= LastRow 'Adding 1 item to the array while keeping the previous elements ReDim Preserve Array(Row) 'Assigning the value to the new element Array(Row) = Range("A" & Row).Value Row = Row + 1 Loop 'Writes to the txt file Row = 1 Do While Row <= LastRow Open Path & "Temporary.txt" For Append As #Row Print #Row, Array(Row) & vbCrLf Close Row = Row + 1 Loop MsgBox ("it's ok") End Sub

HoodRide · Answer

Hello, Small correction for the 2nd loop: you need to put before this loop  Close Then put #1 and not #Line

Create txt file with Excel VBA macro

3 answers

Unable to download

Uninstall totaladblock

Sony wh-1000xm5 not turning on after getting wet

Google photos transfer

Surface pro 4 tablet fully stuck, what to do ??

Broken black screen with talkback enabled and other issues help

Bounced emailsblocked emails

Canon mg6450 printer driver

Texture issues in enshrouded

What to buy for summer 2026