Save As


Posted by Stephanie on November 09, 2001 7:35 AM

Can you save an excel file to a tab delimited file without saving the hidden columns.



Posted by Dank on November 09, 2001 8:31 AM

Here's one way using a simple macro.

Sub SaveTextTab()
Dim shtSource As Worksheet, shtDest As Worksheet

Set shtSource = ActiveSheet
Set shtDest = Worksheets.Add
shtSource.UsedRange.SpecialCells(xlCellTypeVisible).Copy shtDest.Range("A1")
ActiveWorkbook.SaveAs "C:\temp\whatever.txt", xlText
End Sub

Hope it helps,
Daniel.