У меня есть ряд макросов в форме, которую я создал для использования на местах. Когда они завершили документ и хотят отправить его соответствующим людям, я создал макрос FINISH. Это в основном очищает документ от них, уменьшая размер файла примерно до 50 КБ с 2 МБ +. Макрос (ниже) в основном делает следующее:
A.) Удалите кнопки управления, которые я поместил в форму, чтобы они могли использовать их при вводе данных. Эти кнопки есть; Заморозить данные - преобразует все формулы в документе в статический текст. Save File - дает файлу уникальное имя на основе содержимого ячейки в документе. FINISH - кнопка, соответствующая макросу FINISH.
B.) Удаляет вкладку с раскрывающимися данными.
Когда я пытаюсь использовать кнопку FINISH для запуска макроса, я получаю сообщение "Не удается запустить макрос". Формат оценки - 2.xlsm'Button11_Click '. Макрос может быть недоступен в этой книге или все макросы могут быть отключены "
Макросы в рабочей книге Однако, когда я открываю список макросов, это ясно показывает, что макрос находится в этой рабочей книге.
Sub Finish()
Application.DisplayAlerts = False
'
' Finish Macro
' Finish Document For Sending out
'
'
Sheets("DropDownData").Select
ActiveWindow.SelectedSheets.Delete
ActiveSheet.Shapes.Range(Array("Button 10")).Select
Selection.Delete
Selection.Cut
ActiveSheet.Shapes.Range(Array("Button 11")).Select
Selection.Delete
Selection.Cut
ActiveSheet.Shapes.Range(Array("Button 9")).Select
Selection.Delete
Selection.Cut
Range("A6").Select
Application.DisplayAlerts = True
End Sub
Может кто-нибудь помочь с этим?