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

我有幾個複選框，基於複選框的「True」或「False」邏輯，我想導航到同一工作簿中的不同「表格」。請幫助寫一個VBA代碼！如何使用CheckBox Logic導航工作簿中的其他工作表？

我寫了下面的代碼，但是我得到一個「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 Logic導航工作簿中的其他工作表？

回答

相關問題