ªð¦^¦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 : ¨C¤ÑµL©Ò¨Æ¨Æ¡A¬O¤H¥Íªº®ø¶OªÌ¡A¿n·¥¡B¦³¥Î¤~¬O¤H¥Íªº³Ð³yªÌ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD