­ã´£³¡ªL

¥i¥H¤À§P³B²z, ½Ð¤W¶ÇÀÉ®×!!!

­ã´£³¡ªL

¤u§@ªí°Ï:
Private Sub ComboBox1_Change()
Application.Run ComboBox1.Text
End Sub

¤@¯ë¼Ò²Õ°Ï:
Sub AMP_100()
Range("A1:A1619").EntireRow.Hidden = False
End Sub

Sub Pre_Qual()
Range("A1:A1619").EntireRow.Hidden = False
Range("A7:A1377,A1404:A1619").EntireRow.Hidden = True
End Sub

Sub GPU()
Range("A1:A1619").EntireRow.Hidden = True
Range("A7,A178,A216,A226,A228,A334,A378,A341,A487,A494,A531,A640,A647,A684,A793,A800," & _
       "A837,A946,A953,A990,A1033,A1040,A1080,A1132,A1139").EntireRow.Hidden = False
End Sub

Sub Class1()
Range("A7:A1619").EntireRow.Hidden = True
Range("A7,A226,A1185,A1193,A1378,A1404,A1425,A1432,A1454,A1472,A1492," & _
      "A1495,A1533,A1558").EntireRow.Hidden = False
End Sub