Форум по VBA и MS Office

Макрос не хочет открывать файл по указанному пути "Shab":

Sub aa()

Dim wb As Workbook
Dim path As String, Shab As String

path = Excel.ActiveWorkbook.path
Shab = path & "121.xlsm"
Set wb = Excel.Workbooks.Open(fileName:=Shab)

End Sub

После пути нужно записать слеш:
Shab = path & "\" & "121.xlsm"

спасибо