¥¨¶°¸Ìªº°Ñ·Ó¨ìDDE ªºÀx¦s®æ¥X²{¿ù»~
| ©«¤l765 ¥DÃD255 ºëµØ0 ¿n¤À1033 ÂI¦W0  §@·~¨t²Îwindows 11 ³nÅ骩¥»OFFICE2021 ¾\ŪÅv50 ©Ê§O¨k µù¥U®É¶¡2011-5-30 ³Ì«áµn¿ý2025-10-27 
 | 
 ¥¨¶°¸Ìªº°Ñ·Ó¨ìDDE ªºÀx¦s®æ¥X²{¿ù»~
| Private Sub Worksheet_Calculate() If (Range("q31").Value = 1) And (Range("s27").Value = "--") Then
 Range("R31").Value = 2
 marco1
 End If
 END SUB
 
 S27 ¬° DDE ªº°Ñ·Ó =XQKGIAP|Quote!'9904.TW-BestBid5'
 ¤@¶}ÀÉ´N¥X²{¿ù»~
 §Ú§âS27 §ï¬°¤£¬ODDEªº°Ñ·Ó´NµL¦¹°ÝÃD
 ¥t¥~§Ú¥Î
 =text(XQKGIAP|Quote!'9904.TW-BestBid5',0)
 =value(XQKGIAP|Quote!'9904.TW-BestBid5')
 ¬ÒµLªk¸Ñ¨M°ÝÃD
 | 
 | 
|  | 
|  |  | 
|  |  | 
| ©«¤l2035 ¥DÃD24 ºëµØ0 ¿n¤À2031 ÂI¦W0  §@·~¨t²ÎWin7 ³nÅ骩¥»Office2010 ¾\ŪÅv100 ©Ê§O¨k µù¥U®É¶¡2012-3-22 ³Ì«áµn¿ý2024-2-1 
 | 
                
| ¥»©«³Ì«á¥Ñ c_c_lai ©ó 2013-4-26 14:14 ½s¿è 
 Private Sub Worksheet_Calculate()If (Range("q31").Value = 1) And (Range("s27").Value = "--") T ...
 t8899 µoªí©ó 2013-4-26 12:01
 ´£¨Ñ§A°Ñ¦Ò¡G
 
     ¦pÁÙ¦³ºÃ°Ý¡A½Ð³sô§Aªº¨é°ÓÀç·~û¡C
 | 
 | 
|  | 
|  |  | 
|  |  |