ªð¦^¦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 : ¦Y­W¤F­W¡B­WºÉ¤Ü¨Ó¡A¨ÉºÖ¤FºÖ¡BºÖºÉ´d¨Ó¡C
ªð¦^¦Cªí ¤W¤@¥DÃD