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

[µo°Ý] ¤¸¤jRTD°ÝÃD

[µo°Ý] ¤¸¤jRTD°ÝÃD

¥»©«³Ì«á¥Ñ blue2263 ©ó 2016-10-23 13:48 ½s¿è

½Ð±Ð¤j¤j

°ÝÃD1:§Ú­n¦bA1Àx¦s®æ,¿é¤J¤¸¤jRTD¨ç¼Æ®É,µ{¦¡¤£Åý§Ú«Ø¥ß,
03µ{¦¡½X,·|¥X²{»yªk¿ù»~°T®§,½Ð±Ð­n¦p¦ó­×§ï?
  1. Sub ´ú¸Õ
  2.    With ThisWorkbook.Worksheets("X")
  3.      .range("a1") =  "=RTD("money.excel", , "TXF1", "Expire")  'A1Àx¦s®æ,¿é¤J¤¸¤jRTD¨ç¼Æ
  4.   End With
  5. End Sub
½Æ»s¥N½X
°ÝÃD2: ¦³¿ìªkª½±µ³]©wÅܼƨӱµ¦¬RTD & DDEªº¸ê®Æ¶Ü?
¸ÑÄÀ­ì¦], ²{¦b°µªk¬OVBA¥á¥X¨ç¼Æ¤½¦¡->Àx¦s®æ±µ¦¬¸ê®Æ«á->VBA®»¨ú¸ê®Æ->«á¦A°µ«áÄò¸ê®Æ³B²z
§Ú·QÅܼƦpªG¥i¥H,ª½±µ±µ¦¬¸ê®Æªº¸Ü,´N¯à¤Ö¦h­Ó¨BÆJ( ¥á¨ìÀx¦s®æ->±µ¦¬¸ê®Æ->¦A®»¨ú¸ê®Æ)
¦]¦¹·Q°Ý¬O§_¦³?Åܼƥiª½±µ±µ¦¬RTD DDE ¸ê®Æªº¤èªk

Áٽаª¤â¤j¤j,À°¦£¸Ñµª,·P®¦ÁÂÁÂ!!

¦^´_ 1# blue2263
  1. Sub ´ú¸Õ()
  2.    With ThisWorkbook.Worksheets("X")
  3.      .Range("A1") = "=RTD(""money.excel"", , ""TXF1"", ""Expire"")"   'A1Àx¦s®æ,¿é¤J¤¸¤jRTD¨ç¼Æ
  4.   End With
  5. End Sub
½Æ»s¥N½X

TOP

¦^´_ 2# c_c_lai
´ú¸Õ¤v¥i¥¿±`¨Ï¥Î¤F,ÁÂÁÂC¤jÀ°¦£!!

TOP

¦^´_ 3# blue2263
DDE (Dynamic Data Exchange)¡H¡A
³o¦ü¥G¤w¸g¬O·L³n¹L®Éªº¤@ºØ³q°T¶Ç»¼ªº§Þ³N¤F¡C
¦ý¬O¥u­n¬O¶]¨é°Ó´£¨Ñªº¬Ý½L¥æ©öÀ³¥Î³nÅé¡A½Ñ¦p ¥ÃÂ× e-leader, ¤¸¤j yeswin, ¤é²± hts µ¥¡A
³£¥²µM¦³´£¨Ñ DDE ³sµ²ªº¥\¯à¡C ±´¨s­ì¦]¡AExcel ªÖ©w¬O¦û³Ì¤jªº¦]¯À¤F¡A
¦]¬°¤@¯ë¥æ©öªÌ¥i¥H«Ü®e©ö¦a³z¹L Excel¡A§ì¨ú¬Ý½L³nÅ饿¦b¸õ°Ê(Tick)ªº§Y®Éª÷¿Ä°Ó«~¸ê°T¡A
¦b¤£»Ý­n¤ÓÀ´µ{¦¡³]­p»yªkªº±¡ªp¤U¡A¤]¯à§Q¥Î Excel ±j¤jªº²Î­p¥\¯à¡A©ÎªÌ§Q¥Î²³æªº VBScript »yªk¡A
¼¶¼g«ü¼Ð©Î²Î­p¼Æ¾Úµ¥¡C

Api ³ø»ù, RTD, DDE ¤TºØ¤£¦P¶Ç»¼¤ñ¸û
https://youtu.be/hxJTh-FzyIY

TOP

¦^´_ 4# c_c_lai

C¤j½Ð±Ð¤@¤U,§ÚªºRTD³ø»ù¤§«e¦³­Ó°ÝÃD
ª¬ªp¬O¦b¦h­ÓÀx¦s®æ¤º,¿é¤JRTD¨ç¼Æ,±µ¦¬¸ê®Æ,µM«á¥Îµ{¦¡¨C¤ÀÄÁ¬ö¿ý
¦³®É­Ô³¡¥÷Àx¦s®æ,¤£·|±µ¦¬³ø»ù,©Î¬O°±¤î³ø»ù
µM«á§Ú·|¦b(°±¤î³ø»ù)Àx¦s®æ¤º¿ï¨ú¨ç¼Æ«öEnterÁä,¥¦¤~·|¶}©l±µ¦¬³ø»ù

½Ð±Ð¦³¤°»ò¤èªk?¥i³B²z³oºØª¬ªp

TOP

¦^´_ 5# blue2263
¤W¶Ç¹ê»ÚÀɮסA§_«h¥u¬O½M¤lºN¶H (ºN³D)¡C

TOP

¦^´_ 6# c_c_lai

¤£¦n·N«ä,½Ð¬d¦¬ÀÉ®×,ÁÂÁÂ

´Á³f°O¿ý .rar (747.06 KB)

TOP

¦^´_ 7# blue2263
½Ð°Ý Worksheets("X") ¦b­þ¸Ì¡H

TOP

¹ê»Ú°ÝÃDªº±µ¦¬¸ê®Æ,§Ú¤v§R°£
¤U¹Ï¬°¼ÒÀÀ°ÝÃD1µe­±


°ÝÃD2,¬O8:45~11:30,°O¿ý³£¥¿±`,11:30¥H«á¦¨¥æ¶q´N°±¤î¼W¥[

TOP

¦^´_ 8# c_c_lai
¦^´_c¤j
(b¥Dµe­±)¼Ò²Õ,½Ð¤£­n¬Ý,¥D­n°ÝÃD¬O¦ba°O¿ý¼Ò²Õ

TOP

        ÀR«ä¦Û¦b : ­n§åµû§O¤H®É¡A¥ý·Q·Q¦Û¤v¬O§_§¹¬üµL¯Ê¡C
ªð¦^¦Cªí ¤W¤@¥DÃD