軟體:
MicroSoft Office
版本:
??
抱歉不知道怎麼搜尋解答 所以就來打擾大家了
我在工作表中放置一個按鈕
按下去後執行userform1.show
在userform1中 有20個 textbox
我希望在userform1.show之前
把userform1的20個textbox 依序預設為 A1~A20的值
並且把textbox反白
selstart = 0
sellength =len(textbox1.value)
=====================================
Question 1
userform1.textbox1.value = range("A1").value
userform2.textbox2.value = range("A2")....
我需要寫20次 且要逐一更改textbox的1 ,2 3 ...
請問可以用變數寫?
Question 2
textbox1.selstart =0
textbox1.sellength = len(textbox1.value)
我以前會這樣寫... 請問len中的textbox1.value有別的函數可以取代嗎
或者選取(反白)有更簡單的寫法 ?
3Q

迴圈配合controls來指定到textbox的名稱range的值同樣在迴圈內偏移

thx a lotlen(activecontrol.value)

for i = 1 to 20controls("textbox" & i).value = _sheets("工作表1").cells(i,1)next iQ2的問題 依樣要用controls("textbox" & i).valuewow Q1 沒注意到不同的userform不然你在userform 用controls的方式,但我沒試過但如果是像是textbox的控件事可以的