excel暗淡的單元格文本值作爲控件

我遇到了我的宏的問題。我有一個按鈕和一個窗體上的一些複選框，我試圖編寫一個代碼，當我點擊按鈕時，它將檢查範圍（「A1」）。文本後，採取該文本（在這種情況下是「 checkbox1" ），我想說的是這樣的：excel暗淡的單元格文本值作爲控件

questionnaire = Range("A1").Text 
questionnaire.Value = Range("A2").Value

，因爲正如前面提到的，我有很多的複選框，我想，當我在寫某些控件名‘A1’，當我點擊此按鈕，控制將採用「A2」中的值。問題是我不知道我應該如何調查DIM。請幫助

謝謝

來源

2014-03-31 HumanlyRespectable

你的問題不是很清楚。您是否想在A2中顯示覆選框的值 - 基於A1的複選框號碼？ –

假設在單元格「A1」中包含文本「checkbox1」，並在單元格「A2」中包含值「1」，當我單擊按鈕時，我想要單元格「A1」中的任何內容，即我的「複選框1 「的值爲」1「，表示checkbox1.value = true – HumanlyRespectable

他們是**表格**複選框還是** ActiveX **複選框 –

試試這個

Private Sub CommandButton1_Click() 
    CB = Sheets(3).Range("A1").Value 
    CBVal = Sheets(3).Range("A2").Value 

    For Each contr In UserForm1.Controls 
     If TypeName(contr) = "CheckBox" And contr.Name = CB Then 
      contr.Value = CBVal 
     End If 
    Next 
End Sub

確保您在A1正確名稱類型。

enter image description here

來源

2014-03-31 15:52:11

如果以非模態形式加載用戶窗體，那麼您將能夠更改4個複選框中的任何一個。只需在A1中輸入名稱並單擊按鈕。 –

非常感謝，但只是一個簡單的問題，你是什麼讓CB，CBval變暗？ – HumanlyRespectable

沒有變暗他們...所以他們將是變種。但根據您的查詢，您可以將CB變爲String和CBVal作爲Int或Bool。 –

excel暗淡的單元格文本值作爲控件

回答

相關問題