Как использовать логику CheckBox для перемещения других листов в книге?

У меня есть несколько флажков, основанных на «True» или «False» логике флажков, я хотел бы перейти к различным «Листам» в одной книге. Пожалуйста, помогите в написании кода VBA!Как использовать логику CheckBox для перемещения других листов в книге?

Я написал следующий код, но получаю ошибку «OBJECT».

If CheckBox1.Value = True And CheckBox2.Value = True Then Sheets("abc").Range("A3").Select

источник

2016-07-30 Prajwal k.s.

Ошибка объекта? Используете ли вы элементы управления ActiveX или элементы управления формой? –

Объект Ya Ошибка, я использую элементы управления ActiveX. –

Можете ли вы попробовать код, который я разместил? –

Я чувствую, что вы используете элементы управления формой.

Попробуйте это для меня.

Dim cbOne As Shape, cbTwo As Shape 

Set cbOne = ActiveSheet.Shapes("Check Box 1") 
Set cbTwo = ActiveSheet.Shapes("Check Box 2") 

If cbOne.OLEFormat.Object.Value = 1 And cbTwo.OLEFormat.Object.Value = 1 Then 
    ' 
    '~~> Do what you want 
    ' 
End If

источник

2016-07-30 11:02:20

Как использовать логику CheckBox для перемещения других листов в книге?

ответ

Смежные вопросы