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

[µo°Ý] Äæ¦ì½Æ»s°ÝÃD ³Â·Ð敎§Ú¤@¤U ÁÂÁÂ!

¦^´_ 1# lorlcool
  1. Private Sub CommandButton1_Click()
  2.     With Sheet1.[a1]
  3.         If .Value = 123 Then
  4.             Sheet2.[a1] = .Value
  5.         ElseIf .Value = 456 Then
  6.             Sheet2.[a2] = .Value
  7.         End If
  8.     End With
  9. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¦³´¼¼z¤~¯à¤À¿ëµ½´c¨¸¥¿¡F¦³Á¾µê¤~¯à«Ø¥ß¬üº¡¤H¥Í¡C
ªð¦^¦Cªí ¤W¤@¥DÃD