Различные проблемы с событием Workbook_Open

Question

После некоторых исследований в Интернете и Stackoverflow, я застрял на некоторых элементах о функционировании события: Workbook_Open (который вам наверняка покажется простым).
Я написал следующий код:

Public Sub Workbook_Open()

' Désactivation des évènements
Application.EnableEvents = False

' Put the back color of a button to red
' line 1
 CB1.BackColor = &HC0&

' Modify the RowHeight of a line
' line 2
 ThisWorkbook.Worksheets("Search").Rows("12:12").RowHeight = 800

' Réactive l'évènement
Application.EnableEvents = True

End Sub

Precisions:
CB1 - это имя кнопки, вставленной в лист Excel, под названием «Поиск»

У меня две разные проблемы:

Задача № 1:
Кажется, что Excel не распознает переменную CB1 за пределами кода, написанного на листе «Поиск». Я не понимаю почему. Разве переменная CB1 не должна быть доступна для всего кода рабочей книги?

Задача № 2
Я просто не понимаю, почему Line 2 не работает. Даже когда я пишу это в другой процедуре, которую потом вызываю.

Кто-нибудь может дать мне предложение?
С уважением и благодарностью!

Answer 1

Ваш код должен выглядеть примерно так:

Public Sub Workbook_Open()

' Désactivation des évènements
Application.EnableEvents = False

' Put the back color of a button to red
' line 1
'sheet specification a requirement
 Sheets("Search").CB1.BackColor = &HC0&

' Modify the RowHeight of a line
' line 2
' maximum row height is 409
Sheets("Search").Rows(12).RowHeight = 409

' Réactive l'évènement
Application.EnableEvents = True

End Sub

Пожалуйста, смотрите следующую ссылку для максимальной высоты строки в Excel: https://support.office.com/en-ie/article/excel-specifications-and-limits-1672b34d-7043-467e-8e27-269d656771c3