Yes I have seen and read and used... Chandoo save range as text VBA
I have been using this method however, it provides me with different options. Here is the code
I have two questions.
1. Is there a way I can save 'All' the data from a scrollable table, not just the visible?
2. Is there a way I can separate the data from two or more tables? I can save the data by simply entering 'Table1:Table2' in the VB box, but there is not separation and it loses some of the formatting.
I have included a dummy book, I am using the tables from the 'Update' worksheet.
Thanks everyone!
I have been using this method however, it provides me with different options. Here is the code
Code:
Sub ExportRangetoFile()
'Update 20130913
Dim wb As Workbook
Dim saveFile As String
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set wb = Application.Workbooks.Add
WorkRng.Copy
wb.Worksheets(1).Paste
saveFile = Application.GetSaveAsFilename(fileFilter:="Text Files (*.txt), *.txt")
wb.SaveAs Filename:=saveFile, FileFormat:=xlText, CreateBackup:=False
wb.Close
Application.CutCopyMode = False
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
1. Is there a way I can save 'All' the data from a scrollable table, not just the visible?
2. Is there a way I can separate the data from two or more tables? I can save the data by simply entering 'Table1:Table2' in the VB box, but there is not separation and it loses some of the formatting.
I have included a dummy book, I am using the tables from the 'Update' worksheet.
Thanks everyone!