Question

我有一些复选框，基于复选框的“True”或“False”逻辑，我想导航到同一工作簿中的不同“表格”。请帮助写一个VBA代码!!

我编写了以下代码，但是我收到了“OBJECT”错误。

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

Answer 1

我觉得你正在使用表单控件。

试试吧。

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

如何使用CheckBox Logic导航工作簿中的其他工作表？

1 个答案: