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

¤U©Ô¦¡¿ï³æ³]©w

¤U©Ô¦¡¿ï³æ³]©w

½Ð°Ý¦U¦ì°ª¤â
¦p¦ó±N¤U©Ô¦¡¿ï³æ¤¤ªº­È
¥¿½Tªº±a¥X

¨Ò¦p¡G
¤U©Ô¦¡¿ï³æ¤¤¦³(¤p©ú¡B¤j¦P¡B§õ¥|)
ÂI¿ï¤j¦P
·|±N"¤j¦P"±a¨ìA1Äæ¦ì¤¤

¦^´_ 1# baby520every

³o¼Ë??
  1. Range("a1") = ComboBox1.Text
½Æ»s¥N½X

TOP

¥»©«³Ì«á¥Ñ GBKEE ©ó 2014-12-11 07:07 ½s¿è

¦^´_ 1# baby520every



¤U©Ô²M³æ «ü©w¥¨¶°ªº¤º®e
  1. Option Explicit
  2. Sub ¤U©Ô²M³æ1_Change()
  3.     '¥i­×§ï Sheet1 : ¤u§@ªíª«¥ó¼Ò²Õªº¦WºÙ
  4.     With Sheet1.Shapes("¤U©Ô²M³æ 1").OLEFormat.Object
  5.         Sheet1.[A1] = .List(.Value)
  6.     End With
  7. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 3# GBKEE


    TO GBKEE
    ¤p§ÌÁÙ¬O¥Î¤£¥X¨Ó¡H
    ¤@ª½¥X²{Åܼƥ¼©w¸q
    ¥i§_¦b¸Ô²Ó»¡©ú
     ÁÂÁÂ

TOP

¦^´_ 4# baby520every

¦pªþÀÉ
ÁÂÁÂ
abc.rar (12.5 KB)

TOP

        ÀR«ä¦Û¦b : ¡i»X½ªªº¦Û¥Ñ¡j¤H±`¦b¤°»ò³£¥i¥H¦Û¥Ñ¦Û¦bªº®É­Ô¡A«o³Q³oºØÀH¤ß©Ò±ýªº¦Û¥Ñ»X½ª¡AµêÂY®É¥ú¦Ó²@µLıª¾¡C
ªð¦^¦Cªí ¤W¤@¥DÃD