We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Public Sub CmeSaveAs() Dim oldwkbk As String Dim excelwrk As Excel.Application Dim newdate As String Dim sInput As String Set excelwrk = Excel.Application excelwrk.Workbooks.Open "C:\Program Files\Cme\Template_DoNot_Open\Export_Cme_Template.xlsx" excelwrk.Visible = False sInput = InputBox("Enter File name here") ' saveas and then close please excelwrk.ActiveWorkbook.SaveAs "C:\Program Files\Cme\Cme_Export\" & sInput & "_" & newdate excelwrk.ActiveWorkbook.Close End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Input box prompt with only 5 possible entries||5||41|
|Modify to work without control shift enter||9||32|
|Excel Data Validation Help||9||44|
|Looking for UDF that would pick out part of a cell given the the delimiter and the position.||6||15|