[µo°Ý] °õ¦æCommandButton¦p¦óÅý©Ò¦³ToggleButton­È¬°False

oao

1. Private Sub CommandButton1_Click()
   
2. With ActiveSheet
   
3. .ToggleButton1.Value = False
   
4. .ToggleButton2.Value = False
   
5. .ToggleButton3.Value = False
   
6. .ToggleButton4.Value = False
   
7. .ToggleButton5.Value = False
   
8. .ToggleButton6.Value = False
   
9. .ToggleButton7.Value = False
   
10. .ToggleButton8.Value = False
    
11. .ToggleButton9.Value = False
    
12. .ToggleButton10.Value = False
    
13. .ToggleButton11.Value = False
    
14. .ToggleButton12.Value = False
    
15. .ToggleButton13.Value = False
    
16. .ToggleButton14.Value = False
    
17. .ToggleButton15.Value = False
    
18. End With
    
19. End Sub

½Æ»s¥N½X

½Ð°Ý¤W¦Cªºµ{¦¡½X¡A­n¦p¦óÅý¥L§óºë²©O¡H
Àµ½Ð½ç±Ð¡AÁÂÁ¡I

oao

¦^´_ 2# owen06
§Ú¦bºô¸ô¤W§ä¤F«Ü¤[¡A¤]§ä¤£¨ì¸Ñµª¡AÁÂÁ±zªº¼ö¤ß¡I·P®¦¡C

oao

¦^´_ 4# GBKEE
·PÁÂGBKEE¶W¯Åª©¥D©âªÅ¦^´_Åý°ÝÃDªï¤b¦Ó¸Ñ¡A«Ü°ª¿³¦b³Â»¶®a±Ú¤S¾Ç¨ì¤@©Û¡A¨ü±Ð¤F¡A¯uªº·P®¦¡AÁÂÁÂGBKEEª©¥D¡C