- ©«¤l
- 150
- ¥DÃD
- 40
- ºëµØ
- 0
- ¿n¤À
- 215
- ÂI¦W
- 0
- §@·~¨t²Î
- windows xp
- ³nÅ骩¥»
- sp3
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2013-7-15
- ³Ì«áµn¿ý
- 2024-10-2
|
¥»©«³Ì«á¥Ñ blue2263 ©ó 2016-10-23 13:48 ½s¿è
½Ð±Ð¤j¤j
°ÝÃD1:§Ún¦bA1Àx¦s®æ,¿é¤J¤¸¤jRTD¨ç¼Æ®É,µ{¦¡¤£Åý§Ú«Ø¥ß,
03µ{¦¡½X,·|¥X²{»yªk¿ù»~°T®§,½Ð±Ðn¦p¦óקï?- Sub ´ú¸Õ
- With ThisWorkbook.Worksheets("X")
- .range("a1") = "=RTD("money.excel", , "TXF1", "Expire") 'A1Àx¦s®æ,¿é¤J¤¸¤jRTD¨ç¼Æ
- End With
- 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®¦ÁÂÁÂ!! |
|