Нижний индекс вне диапазона при попытке закрыть книгу

#excel #vba

#excel #vba

Вопрос:

Кто-нибудь может мне помочь? У меня ошибка при закрытии книги в VBA

вот мой код:

 Sub CloseWb()

Dim Wb As Workbook
Dim path1 As String
Dim Source As String

Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("SendEmail")
    
'Source = sh.Range("M2").Value
Workbooks(sh.Range("M2").Value).Close SaveChanges:=False  'cause of error

End Sub
 

Комментарии:

1. Это означает sh.Range("M2").Value , что это не имя открытой книги.

2. да, книга включала эту ячейку, это путь к файлу имя_сервера Шаблон 2. Chapel KRA Hr для проверки Отправить электронное письмо Chapel KRA HR Verification_DEC20.xlsx

3. Вы открываете книгу с той же ячейкой? Если это так, то явным решением было бы установить для этой книги значение переменной во время открытия, а затем просто закрыть заданную переменную. В противном случае вам просто нужно передать название книги расширение. Не весь путь