| Home |
| Search |
| Today's Posts |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Trying to use VBA to save a copy of a workbook
Excellent, That works, Thanks a lot :)
"Chip Pearson" wrote: Try something like Sub DoSave() Dim FName As Variant FName = Application.GetOpenFilename("Excel Files (*.xls),*.xls") If FName = False Then ' user cancelled. Exit Sub Else If Dir(FName) < vbNullString Then ' file exists If MsgBox("File: " & FName & _ " already exists. Overwrite it?", vbYesNo) = vbYes Then Kill FName Else ' don't overwrite existing file Exit Sub End If End If ThisWorkbook.SaveCopyAs Filename:=FName End If End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com (email address is on the web site) "kfell" wrote in message ... Hello, I'm trying to use VBA to save a copy of a workbook, I want to just save the values not all the formulas and links. So I've got the macro to copy the sheet and then paste special with values only and then I want to Save it. I want to be prompted where to save it. I've tried using activeworkbook.close but because I have a workbook before close event macro it just closes without saving the changes. Is there anyway I can either stop the before close macro running or can I get SaveCopyAs to ask for a filename |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Shared workbook - to save or not to save | Excel Discussion (Misc queries) | |||
| Select sheet tabs in workbook & save to separate workbook files | Excel Worksheet Functions | |||
| How do I save a workbook as a new workbook by using macros? | Excel Discussion (Misc queries) | |||
| How to save a file without overwrite or save a copy? | Setting up and Configuration of Excel | |||
| How can I save an editable copy of a protected excel workbook? | Excel Discussion (Misc queries) | |||
Threaded Mode
