| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Macro to Save just one sheet to new workbook.
I need a macro that when selected will copy the currently displayed sheet of
a workbook to a new workbook *(with only the values, no macros or formulas), and then, if possible, to also automatically bring up the 'Save As' window with the current date as the name, formatted as (mm-dd-yy). Thanks ya'll, Guy |
|
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Macro to Save just one sheet to new workbook.
ActiveSheet.Copy
Set newbk = ActiveWorkbook newbk.ActiveSheet.Cells.Copy newbk.ActiveSheet.Cells.PasteSpecial Paste:=xlPasteValues InitialName = Format(Date, "mm-dd-yy") & ".xls" FName = Application.GetSaveAsFilename(InitialFileName:=Ini tialName, _ fileFilter:="Excel Files (*.xls), *.xls") newbk.SaveAs Filename:=FName "Guy" wrote: I need a macro that when selected will copy the currently displayed sheet of a workbook to a new workbook *(with only the values, no macros or formulas), and then, if possible, to also automatically bring up the 'Save As' window with the current date as the name, formatted as (mm-dd-yy). Thanks ya'll, Guy |
|
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
Macro to Save just one sheet to new workbook.
That is perfect!
Thanks a bunch, Guy "Joel" wrote: ActiveSheet.Copy Set newbk = ActiveWorkbook newbk.ActiveSheet.Cells.Copy newbk.ActiveSheet.Cells.PasteSpecial Paste:=xlPasteValues InitialName = Format(Date, "mm-dd-yy") & ".xls" FName = Application.GetSaveAsFilename(InitialFileName:=Ini tialName, _ fileFilter:="Excel Files (*.xls), *.xls") newbk.SaveAs Filename:=FName "Guy" wrote: I need a macro that when selected will copy the currently displayed sheet of a workbook to a new workbook *(with only the values, no macros or formulas), and then, if possible, to also automatically bring up the 'Save As' window with the current date as the name, formatted as (mm-dd-yy). Thanks ya'll, Guy |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| save each sheet of a workbook as its own workbook | Excel Discussion (Misc queries) | |||
| Save Sheet as Workbook | Excel Discussion (Misc queries) | |||
| Macro to save excel sheet in a workbook | Excel Discussion (Misc queries) | |||
| Select sheet tabs in workbook & save to separate workbook files | Excel Worksheet Functions | |||
| Can I only save one sheet out of the workbook? | Excel Discussion (Misc queries) | |||
![Guy[_2_] is offline](https://www.excelbanter.com/images/SultanThemeVB3R/statusicon/user_offline.gif)
Linear Mode
