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

Ãö©óMsgBoxµøµ¡~¬°¤°»ò·|¸õµ¡2¦¸?

CheckBox51.Value = False
¹B¦æ®É, ·|µoIJµo¤@¦¸ CheckBox51_Click
³o¼Ë·|¤ñ¸û¦w¥þ
  1. Private Sub CheckBox51_Click()
  2. If CheckBox51.Value = True Then
  3.     MsgBox ("¯Ê³f¤¤")
  4.     application.enableevents = false
  5.     CheckBox51.Value = False
  6.     application.enableevents = true
  7. End If
  8. End Sub
½Æ»s¥N½X
À´±oµo°Ý,µª®×´N·|¦b¨ä¤¤

¤µ¤éの¤@¬íは  ©ú¤éにない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡¦pÆp¥Û¡j®É¶¡¹ï¤@­Ó¦³´¼¼zªº¤H¦Ó¨¥¡A´N¦pÆp¥Û¯ë¬Ã¶Q¡F¦ý¹ï·M¤H¨Ó»¡¡A«o¹³¬O¤@§âªd¤g¡A¤@ÂI»ù­È¤]¨S¦³¡C
ªð¦^¦Cªí ¤W¤@¥DÃD