Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I want to save a copy as text not the file itself.
Currently this macro works and saves a text mac file "19". If I change it to saveCopyAs it doesn't work. It does the same thing if I change it to another file type so I don't think it has anything to do with the file type. I don't want to destroy the workbook but I need to save a copy as text. Why doesn't saveCopyAs work instead of SaveAs? Sub saveIndesign() 'Appends date to filename so as to not write over an existing file ' saveIndesign Macro Const fPath As String = "Mac OS X:" Dim fName As String Dim myFileName As String myFileName = Left(ActiveWorkbook.Name, Len(ActiveWorkbook.Name) - 4) & Format(Now, "yyyymmdd_hhmmss") & ".txt" fName = fPath & myFileName Application.DisplayAlerts = False 'do the save ActiveWorkbook.SaveAs Filename:=fName, FileFormat:=19 Application.DisplayAlerts = True MsgBox "File Saved to " & fName End Sub thanks, |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
excel save as csv - force text qualifier on every text field | Excel Discussion (Misc queries) | |||
How to save a file without overwrite or save a copy? | Setting up and Configuration of Excel | |||
Auto save replaced my original file and now I need the original? | Excel Discussion (Misc queries) | |||
VBA to Save a file to a different format but keep original | Excel Programming | |||
Save As - Multiple Sheets fails to save as text file | Excel Programming |