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

[µo°Ý] ½Ð°Ý ¦p¦ó«ö¤@¤U «ö¶s1_Click ±N¤@­Ó­È ¶Ç°e¨ì ¥Ø«e´å¼Ð ªºÀx¦s®æ

¦^´_ 4# mycmyc
  1. Sub «ö¶s1_Click()
  2.     [E1] = [A1]
  3. End Sub
½Æ»s¥N½X

TOP

¦^´_ 3# kobo

ÁÂÁ  ¦b½Ð°Ý¤@¤U  §Úªº´å¼Ð¦b E1    ­n¨ú±o  A1 ­È  ¸Ó«ç»ò°µ©O
HI

TOP

Sub «ö¶s1_Click()
      ActiveCell.Value = "*"
End Sub
§A¤]¥i¥H§Q¥Î¿ý»s¥¨¶°ªº¤èªk¨ú±oµ{¦¡½X
¦h¦h¿ý»sªº¥¨¶°¨Ã¬ã¨s,±N¥i¥[³t§Aªº¾Ç²ß

TOP

Sub «ö¶s1_Click()
Set curs = Selection
curs.Value = "*"

End Sub
OK
¥¿½T¶Ü¡H
HI

TOP

        ÀR«ä¦Û¦b : ¨C¤ÑµL©Ò¨Æ¨Æ¡A¬O¤H¥Íªº®ø¶OªÌ¡A¿n·¥¡B¦³¥Î¤~¬O¤H¥Íªº³Ð³yªÌ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD