¥¨¶°¸Ìªº°Ñ·Ó¨ìDDE ªºÀx¦s®æ¥X²{¿ù»~
- ©«¤l
- 760
- ¥DÃD
- 250
- ºëµØ
- 0
- ¿n¤À
- 1023
- ÂI¦W
- 0
- §@·~¨t²Î
- windows 11
- ³nÅ骩¥»
- OFFICE2021
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2011-5-30
- ³Ì«áµn¿ý
- 2024-11-29
|
¥¨¶°¸Ìªº°Ñ·Ó¨ì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 |
|
|
|
|
|
|
- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§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 |
|
|
|
|
|
|