ªð¦^¦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 : §g¤l¦p¤ô¡AÀH¤è´N¶ê¡AµL³B¤£¦Û¦b¡C
ªð¦^¦Cªí ¤W¤@¥DÃD