2015-10-20 52 views
0

我試圖在單個按鈕單擊一組表單時取決於一組複選框的狀態,以生成唯一的輸出。根據複選框狀態在單元格之間移動

有一組十個盒子,其中任何一盒最多可以選擇十個盒子。點擊按鈕時,每個複選框的名稱將按順序顯示。因此,例如:

複選框1和3被選中,該按鈕被點擊時,則輸出到細胞將如下所示:[檢查BOX1] [檢查BOX3]

然而,如果盒1 2 3 9檢查,它會顯示: [檢查BOX1] [查看BOX2] [查看BOX3]等....

我的主要問題是,我只希望複選框的名稱顯示爲標題,如果是選擇。

+0

的什麼標題??? –

+0

標題將被選中的複選框的名稱 – SFro

回答

0

假設 「形式」 的複選框(相對於的ActiveX型)

dim i, n, s 

n = 0 
for i = 1 to 10 
    s = "Check Box " & i 
    if activesheet.checkboxes(s).Value = 1 then 
     Activesheet.range("A1").offset(0, n).value = s 
     n = n + 1 
    end if 
next i 
+0

抱歉,應該指定,我需要它的ActiveX類型 – SFro

相關問題