Convert Each Worksheet in Workbook to Text File @Exceltrainingvideos

Uploaded October 2019 | Updated September 2026, 2 weeks ago

How to convert each worksheet in workbook to text file automatically with Excel VBA.
Here's the complete VBA code:
Option Explicit

Sub saveSheetsAsTextFiles()

Dim wksht As Worksheet

Application.DisplayAlerts = False

For Each wksht In ActiveWorkbook.Worksheets

wksht.Select
ActiveWorkbook.SaveAs Filename:="C:\ExcelToText\" & wksht.Name & ".txt", FileFormat:=xlText

Next wksht

Application.DisplayAlerts = True

End Sub

Using Lambda for Iterations or Recursion

Send Emails From Specific Account in Outlook

Highlight Differences in 2 Lists Automatically

Validate Time Entry in TextBox on UserForm | 2021

Copy Non Adjacent Cells Data from Multiple Workbooks

Open Any Third Party Application Using Shell Function

2021 | Insert Hyperlink Automatically - 1 minute

Automatically Clear Contents of Worksheet without Clearing Formulas