ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¦p¦ó¥i¥H¤@¦¸©Ê§ïVBA userform checkbookªºvalue

Private Sub CommandButton1_Click()
For i = 1 To 100
¡@¡@UserForm1("CheckBox" & i).Value = 1
Next
End Sub

i ­È¥i¥Î TextBox ­È¥h¶]¡I¡I¡I

TOP

        ÀR«ä¦Û¦b : ¤@­Ó¯Ê¤fªºªM¤l¡A¦pªG´«¤@­Ó¨¤«×¬Ý¥¦¡A¥¦¤´µM¬O¶êªº¡C
ªð¦^¦Cªí ¤W¤@¥DÃD