2017-07-27 28 views
1

我有一個窗體控件,其中包含ActiveX收藏/選項按鈕。 表單控件名稱是Side,包含名稱爲xOption,oOption和randomSide的選項/單選按鈕。 我將如何創建一個宏,使我可以在打開工作簿時將單選按鈕設置爲特定值。錄製宏的單擊選項會導致空白宏。我已經嘗試過:如何選擇窗體控件中的ActiveX選項/單選按鈕

ActiveSheet.Shapes.Range(Array("Side")).Select 
ActiveSheet.Shapes.Range("xOption").OLEFormat.Object.Value = 1 

但是這給了我錯誤1004和其他代碼給我錯誤91.我是真正的新VBA,所以如果我看起來愚蠢,你知道爲什麼。

+0

您是否想在打開工作簿時選擇一個選項? – paulinhax

+0

@paulinhax是的,只有一個 –

回答

1

嘗試這樣的事情,用Worksheets代替ActiveSheet

Private Sub Workbook_Open() 
    Worksheets("your sheet name here").OLEObjects("xOption").Object.Value = 1 
End Sub 

當你想讓它打開表後進行選擇。把它放在ThisWorkbook

+0

另請參閱[this](https://stackoverflow.com/documentation/excel-vba/1107/vba-best-practices/11274/always-define-and-set-references-to-all-workbooks-and-sheets #T = 201707271939591786196)。 – paulinhax

0

你可以試試這樣的事情...

ActiveSheet.OLEObjects("xOption").Object.Value = 1 
+0

這給了我一個1004錯誤,無法獲得工作表的OLEObjects屬性類 –

+0

由於代碼將在ActiveSheet上工作,您確定在ActiveSheet上有一個ActiveX選項按鈕?還要確保選項按鈕的名稱與代碼中使用的名稱相同。 – sktneer