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

¦p¦ó °»´ú DDE §Y®É³ø»ùªº ©³¼h °ò¦§Þ³N

¦p¦ó °»´ú DDE §Y®É³ø»ùªº ©³¼h °ò¦§Þ³N

¤Ñ¤U¬°¤½

¦^´_ 1# sjgau


  ¬Ý§¹¤F¾ã½g¤å³¹

³Ì¤£¸Ñªº¨ä¹êÁÙ¬O³o¬q


¦p¦ó¥Î¡H ¤ñ·Q¹³ÁÙ­n³Â·Ð¡C §A¥²¶·¥ýµn°O©Ò·Q­n³B²z§t DDE Link CELL ªº¦r¦ê¡AµM«á¦A©e°U¥æµ¹¨Æ¥ý¼g¦nªº VBA ¥¨¶° (Marco) ¨Ó³B²z¡C¦p¤U¡G

ActiveWorkbook.SetLinkOnData _
"CATDDE|'STOCK2330 '!Volume", _
"my_Link_Update_Macro"

²Ä¤@­Ó°Ñ¼Æ¬O DDE Link ªº¦r¦ê"¡G²Ä¤G­Ó°Ñ¼Æ´N¬O¥¨¶°ªº¦WºÙ¡C

°O±o¡A¬O­n§â­È±oÃöª`ªº DDE CELL ¤@­Ó¤@­Ó§Q¥Î¸Óµ{§Ç¨Óµn°O¡A­Y¬O­n¥þ³¡ªº CELL ³£­nµn°O¡A¨º»ò°Ñ¦Ò¦p¤Uªº¼gªk (refer. DDE Link Change Event¡C)¡G



­«ÂI¬O·Q¬Ý­ì¤å  ¤W­zªºDDE Link Change Event  ³sµ²¤w¸g¥¢®Ä¤F
½Ð°Ýª©¥D¤F¸Ñ¨Ï¥Î¥¨¶°±Ò°ÊtickÅܤƪº³o­Ó³¡¤À¶Ü??

TOP

¦^´_ 2# handsometrowa


    ¥i¥H¼g¦b¥H¤U¨Æ¥ó§õ

Private Sub Worksheet_Change(ByVal Target As Range)

if target=range("a1") then
   range("a1").end(xldown)=range("a1")
end if

End Sub

©Ò¥H·í§A¼Æ¦r¦³ÅÜ°Ê ´N·|¨ì³o¸Ì­±°õ¦æ½Æ»sªºµ{¦¡
¤Ñ¤U¬°¤½

TOP

¦^´_ 3# sjgau


    ªO¤j

³o­Ó·N«ä¬O   §A±NDDE ·|§ó§ïªº¸ê®Æ©ñ¦bA1¸Ì­±

·í¼Æ¦r¦³Åܰʪº®É­Ô¡A¥L´N·|±qA2>A3>A4 ³o¼Ë¤l°O¿ý¤U¥hªº·N«ä¶Ü..

TOP

¦^´_ 4# handsometrowa


   §ÚÁÙ¨S¦³ try, §Ú¤]¥¿¦b¹Á¸Õ ¬ð¯}³o­Ó °ÝÃD
¤Ñ¤U¬°¤½

TOP

¥»©«³Ì«á¥Ñ c_c_lai ©ó 2013-10-21 13:53 ½s¿è
¦^´_  handsometrowa


   §ÚÁÙ¨S¦³ try, §Ú¤]¥¿¦b¹Á¸Õ ¬ð¯}³o­Ó °ÝÃD
sjgau µoªí©ó 2013-10-21 11:21

¦p¦¹¼gªk¡A¸ê®Æ·|¤@ÆY®ØËç¡I

TOP

¦^´_ 6# c_c_lai


    §Ú¥Ø«e¬O¥ÎDDE ©w®É°O¿ý¨ì¥t¤@­¶­±¥h  15 ¬í¤@¦¸

TOP

¦^´_ 7# yuhuahsiao


    ¥i¥H ¸ò±z ¤À¨É±zªº VBAµ{¦¡Àɮ׶ܡH

±N¨Ó§Ú¼g¥X¥æ©öµ¦²¤¡A·| ¤À¨Éµ¹±z

§Úªº e-mail


sjgau4311 at gmail.com

ÁÂÁÂ
¤Ñ¤U¬°¤½

TOP

¦^´_ 7# yuhuahsiao
§Ú¤§«e´¿¸g¦P®É¨Ï¥Î¹L 20¬í¡B¤@¤ÀÄÁ¡B¤­¤ÀÄÁ¨Ó°µ§PÂ_¡A
¤@¯ë¦Ó¨¥¡A³o¯ÂºéÄݨC­Ó¤H¤§Æ[ÂI¡B»P¨Ï¥Î¸gÅç¤Î²ßºD¡C
¬Æ¦Ü¦³¨Ç¤H¥Î¹L10¬í©Î¤T¤Q¤ÀÄÁ¨Ó°µ¤ÀªR©O¡A¨£¤¯¨£´¼¡I

TOP

¦^´_ 9# c_c_lai


    ¦]¬°¡A§Úªº VBA ªº¹Ò¬É¬O ÄÝ©ó ªì¾Ç¡A
©Ò¥H «D±`»Ý­n¦³ ¤@­Ó½d¨Ò¥i¥H°Ñ¦Ò¡C

§Æ±æ ±z¯à°÷ ¤À¨É À°¦£
¤Ñ¤U¬°¤½

TOP

        ÀR«ä¦Û¦b : ¡i°µ¤Hªº¶}©l¡j¨C¤@¤Ñ³£¬O¬G¤Hªº¶}©l¡A¨C¤@­Ó®É¨è³£¬O¦Û¤vªºÄµ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD