| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
how do I write a request to 'Save As' Macro
thanks, problem sorted
regards Craig "Dave Peterson" wrote: If you want to type in the name of the file, then why not just hit ctrl-s or File|SaveAs. But you could show that same dialog with a line: Application.Dialogs(xlDialogSaveAs).Show CRAIG K wrote: Hi Dave, I actually need to call teh work book by a different number which may not be incremental so I would have to enter it manually at the save as stage such as "2350wiz.xls". Here is the actual macro to show you what I have and maybe you could show me how to append the 'save as' bit to the end regards Craig Workbooks.Open Filename:="C:\excel run data\data\WIZSAVEDATA.xls" Windows("JETLOOPR.XLS").Activate Sheets("Ten Minutes").Select Sheets("Ten Minutes").Copy Befo=Workbooks("WIZSAVEDATA.xls").Sheets(1) Windows("JETLOOPR.XLS").Activate Sheets("Hourly").Select Sheets("Hourly").Copy Befo=Workbooks("WIZSAVEDATA.xls").Sheets(1) ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End Sub "Dave Peterson" wrote: Maybe you could use the date/time appended to the name: Dim WizWkbk as workbook set wizwkbk = workbooks.open("C:\somefolder\wizdatasave.xls") 'do the work wizwkbk.saveas filename:="C:\someexistingfolder\wizdata" _ & format(now, "yyyymmdd-hhmmss") & ".xls", _ fileformat:=xlworkbooknormal CRAIG K wrote: Hi, I have recorded a macro which opens a new workbook called 'wizdatasave', then the macro selects and copies 2 worsheets from another open workbook and pastes them into the newly open workbook 'wizdatasave'. What code do I enter into the macro to automate the 'Save As' function? I need to save the 'wizdatasave' workbook as something different each time it is opened. regards Craig -- Dave Peterson -- Dave Peterson |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Macro Request: Fill in empty cells with previous Filled cell in column | Excel Worksheet Functions | |||
| no need save request box when excel is closing. | Excel Discussion (Misc queries) | |||
| Can I write an excel formula to display the file save date? | Excel Worksheet Functions | |||
| is it possible to execute write to the fields in another .xsl form a macro in another .xsl? e.g. some way to load another .xsl into an .xsl macro and write to its data? | Excel Worksheet Functions | |||
| How to Create an Excel Macro to send a meeting request. | Excel Discussion (Misc queries) | |||
![CRAIG K[_2_] is offline](https://www.excelbanter.com/images/SultanThemeVB3R/statusicon/user_offline.gif)
Hybrid Mode
