Is it possible to use an input box to assign a file name during saving? Here's my code, but it names the file "MyInput" instead of what I enter in the input box. What am I doing wrong?
Sub BCVHCSAVE()
'
' BCVHCSAVE Macro
'

'
    MyInput = InputBox("Enter file name for saving")
    ChDir "I:\Dept\Accounting\Payroll Reports\Accrued PTO Dollars\FY10\33_BCVHC"
    ActiveWorkbook.SaveAs Filename:= _
        "I:\Dept\Accounting\Payroll Reports\Accrued PTO Dollars\FY10\33_BCVHC\MyInput.xlsx" _
        , FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
End Sub