Run-time error '1004' Not sure why? Code runs well in one place.

[msquared99]

I have a macro that errors out on the line of code that says ActiveWorkbook.

The exact same code runs well in one place but not the other.

Any idea why?

sFileName = "MN Packout Log " & Format(Now, "mm-dd-yy") & ".xlsm"
  sBasePath = "C:\General Use\UPS Daily Tracking\Logs\"
 
  ActiveWorkbook.SaveAs sBasePath & sFileName

 

[Deepak]

As said path is missing there!

Dim sFileName As String, sBasePath As String
sFileName = "MN Packout Log " & Format(Now, "mm-dd-yy") & ".xlsm"
  sBasePath = "C:\General Use\UPS Daily Tracking\Logs\"
    If Dir(sBasePath, vbDirectory) <> "" Then ActiveWorkbook.SaveAs sBasePath & sFileName Else MsgBox "Path Missing"