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

[µo°Ý] ¦p¦ó±NIF§P§O¦¡¼g¦¨Caseªº«¬ºA

[µo°Ý] ¦p¦ó±NIF§P§O¦¡¼g¦¨Caseªº«¬ºA

If ComboBox1.Caption = "¤¥¦Ì" Then
    UserForm1.Hide
    UserForm2.Show
End If

If ComboBox1.Caption = "¦w¤ß" Then
    UserForm1.Hide
    UserForm3.Show
End If

If ComboBox1.Caption = "¦À¤W" Then
    UserForm1.Hide
    UserForm4.Show
End If

select case ComboBox1.Caption
  case "¤¥¦Ì"
        UserForm1.Hide
        UserForm2.Show
  case "¦w¤ß"
      UserForm1.Hide
     UserForm3.Show
  case "¦À¤W"
     UserForm1.Hide
     UserForm4.Show
end select

TOP

        ÀR«ä¦Û¦b : ¥ÌÄ@°µ¡BÅw³ß¨ü¡C
ªð¦^¦Cªí ¤W¤@¥DÃD