Board logo

標題: [發問] Userform裡用迴圈抓ToggleButton名稱 [打印本頁]

作者: lifedidi    時間: 2014-3-27 14:04     標題: Userform裡用迴圈抓ToggleButton名稱

小弟在userform裡放置50個ToggleButton

分別命名為A1 A2....A50

使用者於點選後將數值傳到sheet1裡

想用For來減少編碼,如下:

For i = 1 to 50

 x = "A" & i

 If x = True Then sheet1.cells(0+i,1) = 編號.value

Next

但是抓不到值

請問如何才能抓到呢?謝謝。
作者: lifedidi    時間: 2014-3-27 16:23

大大檔案如下

[attach]17887[/attach]

這是用在廠內規劃

因為有很多廠 第一個廠就44塊方格 總共還有五個 大概要200個方格

之後還要利用兩百個方格 做不同月份的編輯 所以 編起來太龐大 希望藉由迴圈的方式

有勞大大,謝謝。
作者: lifedidi    時間: 2014-3-28 08:54

感謝大大的幫忙,

小弟有找到方法了,

For A = 1 To 44

AA = "A" & A

Controls(AA).Caption = Sheet3.Cells(1 + A, 2).Value

Next

如果有類似問題的人可以參考看看,謝謝。
作者: Hsieh    時間: 2014-3-28 09:41

回復 2# lifedidi

For i = 1 To 44
  Controls("A" & i).Caption = Sheet3.Cells(i + 1, 2)
Next




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)