#excel #vba
#excel #vba
Вопрос:
У меня проблема с файлом Excel, созданным в версии 2003.
Используя Excel версии 2016, я попытался открыть этот файл, но появилось сообщение об ошибке от VBA:
Ошибка времени выполнения ‘57121’, определяемая приложением или объектом ошибка
Кажется, Worksheets("...").Activate
вызывает проблему.
Это Workbook_Open код
Private Sub Workbook_Open()
Dim i As Integer, j As Integer, k As Integer, l As Integer, ws As Worksheet, rs As QueryTable
Worksheets("Summary").Activate
Workbooks(ThisWorkbook.Name).RefreshAll
Worksheets("Summary").Select
Application.ScreenUpdating = False
Folderpath = "C:UsersuserDesktopBackup amp; ThisWorkbook.Sheets("Test").Range("D2").Value amp; ""
Filepath = "Test " amp; ThisWorkbook.Sheets("Test").Range("D2").Value amp; ".xls"
Application.DisplayAlerts = False
Workbooks.Open (Folderpath amp; Filepath), UpdateLinks:=False
end sub
Все работает для Excel 2003, но не в Excel 2016
Комментарии:
1. Похоже, что есть подпрограмма
Auto_Open
илиWorkbook_Open
. Что именно он делает? Было бы полезно добавить больше кода.2. Удерживайте нажатой клавишу shift при открытии файла — это должно предотвратить запуск любого кода событием Open. Было бы полезно опубликовать больше кода, если у вас все еще возникают проблемы.