¦p¦ó±N¥x«ü´Áªº¨C¤@¤ÀÄÁ¸ê®Æ³£¬ö¿ý¦bsheet 1¸Ì..½Ð±Ðª©¤W°ª¤â«e½ú~~
- ©«¤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
|
¦^´_ 10# cfuxiong
§Aª½±µ±NDDE¶×¤J¦r¦ê¤½¦¡ J2 §ï¦¨ K2 ´N OK ¤F¡C |
|
|
|
|
|
|
- ©«¤l
- 93
- ¥DÃD
- 18
- ºëµØ
- 0
- ¿n¤À
- 111
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- OFFICE
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW¡E°ª¶¯
- µù¥U®É¶¡
- 2010-10-22
- ³Ì«áµn¿ý
- 2023-3-3
|
DDE¶×¤J¦r¦ê¤½¦¡ J2 §ï¦¨ K2=>§ä¤£¨ì¦ì§}¦Aþ¡H¥i¥H§i¶D§Ú¶Ü¡H |
|
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|
- ©«¤l
- 93
- ¥DÃD
- 18
- ºëµØ
- 0
- ¿n¤À
- 111
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- OFFICE
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW¡E°ª¶¯
- µù¥U®É¶¡
- 2010-10-22
- ³Ì«áµn¿ý
- 2023-3-3
|
¦^´_ 11# c_c_lai
DDE¶×¤J¦r¦ê¤½¦¡ J2 §ï¦¨ K2=>§ä¤£¨ì¦ì§}¦Aþ¡H¥i¥H§i¶D§Ú¶Ü¡H |
|
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|
- ©«¤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
|
¦^´_ 13# cfuxiong
§Aªº¨é°Ó¬O¥Îþ®a¡H
Ä´¦p¡G¤¸¤j ¦¨¥æ»ù =YT|KS!TXFJ2.124 ---> =YT|KS!TXFK2.124
©ö§Q±o ¦¨¥æ»ù =CATDDE|'FUTOPT<FO>TXFJ2 '!CurPrice ---> =CATDDE|'FUTOPT<FO>TXFK2 '!CurPrice
¥H¦¹Ãþ±À¡C |
|
|
|
|
|
|
- ©«¤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
|
¦^´_ 13# cfuxiong
°e§A¤@¤äÂà´«²[¦¡¡A§A¥un§ó´«¦¨§A¼g¤JªºÄæ¦ì«K¦¨ (¤¸¤j¤Î©ö§Q±o)¡C- Sub changeMonth() ' °õ¦æµ²ºâÂà¤ë
- Dim sCode, tCode As String, mArray()
-
- sCode = Sheets("Omega").Range("U17").Value ' [color=Red]¥Ø«e(¥»¤ë)¤Þ¤JȬ° "K211"[/color]
- If (Len(sCode) = 4) Then
- mArray = Array("¤@¤ë", "¤G¤ë", "¤T¤ë", "¥|¤ë", "¤¤ë", "¤»¤ë", "¤C¤ë", "¤K¤ë", "¤E¤ë", "¤Q¤ë", "¤Q¤@¤ë", "¤Q¤G¤ë")
- tCode = Right(sCode, 2)
- sCode = Left(sCode, 2)
-
- With Sheets("Omega")
- .Range("A2").Value = "TXF" & sCode ' ¤¸¤j
- .Range("B2").Formula = "=YT|KS!TXF" & sCode & ".402"
- .Range("C2").Formula = "=YT|KS!TXF" & sCode & ".122"
- .Range("D2").Formula = "=YT|KS!TXF" & sCode & ".123"
- .Range("E2").Formula = "=YT|KS!TXF" & sCode & ".124"
- .Range("F2").Formula = "=YT|KS!TXF" & sCode & ".125"
- .Range("G2").Formula = "=YT|KS!TXF" & sCode & ".126"
- .Range("H2").Formula = "=YT|KS!TXF" & sCode & ".128"
- .Range("I2").Formula = "=YT|KS!TXF" & sCode & ".130"
- .Range("J2").Formula = "=YT|KS!TXF" & sCode & ".131"
- .Range("K2").Formula = "=YT|KS!TXF" & sCode & ".132"
- .Range("L2").Formula = "=YT|KS!TXF" & sCode & ".133"
- .Range("M2").Formula = "=YT|KS!TXF" & sCode & ".135"
- .Range("N2").Formula = "=YT|KS!TXF" & sCode & ".136"
- .Range("O2").Formula = "=YT|KS!TXF" & sCode & ".437"
- .Range("P2").Formula = "=YT|KS!TXF" & sCode & ".405"
- .Range("Q2").Formula = "=YT|KS!TXF" & sCode & ".406"
- .Range("R2").Formula = "=YT|KS!TXF" & sCode & ".407"
- .Range("S2").Formula = "=YT|KS!TXF" & sCode & ".422"
- .Range("T2").Formula = "=YT|KS!TXF" & sCode & ".423"
- .Range("U2").Formula = "=YT|KS!TXF" & sCode & ".431"
- .Range("V2").Formula = "=YT|KS!TXF" & sCode & ".170"
- .Range("W2").Formula = "=YT|KS!TXF" & sCode & ".172"
- .Range("X2").Formula = "=YT|KS!TXF" & sCode & ".171"
- .Range("Y2").Formula = "=YT|KS!TXF" & sCode & ".173"
- .Range("Z2").Formula = "=YT|KS!TXF" & sCode & ".290"
- .Range("AA2").Formula = "=YT|KS!TXF" & sCode & ".291"
- .Range("AB2").Formula = "=YT|KS!TXF" & sCode & ".201"
- .Range("AC2").Formula = "=YT|KS!TXF" & sCode & ".202"
- .Range("AD2").Formula = "=YT|KS!TXF" & sCode & ".203"
- .Range("AE2").Formula = "=YT|KS!TXF" & sCode & ".204"
- .Range("AF2").Formula = "=YT|KS!TXF" & sCode & ".205"
- .Range("AG2").Formula = "=YT|KS!TXF" & sCode & ".211"
- .Range("AH2").Formula = "=YT|KS!TXF" & sCode & ".212"
- .Range("AI2").Formula = "=YT|KS!TXF" & sCode & ".213"
- .Range("AJ2").Formula = "=YT|KS!TXF" & sCode & ".214"
- .Range("AK2").Formula = "=YT|KS!TXF" & sCode & ".215"
- .Range("AL2").Formula = "=YT|KS!TXF" & sCode & ".221"
- .Range("AM2").Formula = "=YT|KS!TXF" & sCode & ".222"
- .Range("AN2").Formula = "=YT|KS!TXF" & sCode & ".223"
- .Range("AO2").Formula = "=YT|KS!TXF" & sCode & ".224"
- .Range("AP2").Formula = "=YT|KS!TXF" & sCode & ".225"
- .Range("AQ2").Formula = "=YT|KS!TXF" & sCode & ".231"
- .Range("AR2").Formula = "=YT|KS!TXF" & sCode & ".232"
- .Range("AS2").Formula = "=YT|KS!TXF" & sCode & ".233"
- .Range("AT2").Formula = "=YT|KS!TXF" & sCode & ".234"
- .Range("AU2").Formula = "=YT|KS!TXF" & sCode & ".235"
- .Range("AV2").Formula = "=YT|KS!TXF" & sCode & ".147"
- .Range("AW2").Formula = "=YT|KS!TXF" & sCode & ".148"
- .Range("A12").Value = "¥x´Á " & tCode ' ©ö§Q±o
- .Range("B12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!BuyPrice1"
- .Range("B13").Value = "»O«ü " & tCode
- .Range("C12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!SellPrice1"
- .Range("D12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!CurPrice"
- .Range("E12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!TickVol"
- .Range("F12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!Volume"
- .Range("G12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!High"
- .Range("H12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!Low"
- .Range("I12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!Diff"
- .Range("J12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!DiffRate"
- .Range("K12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!UpLimit"
- .Range("L12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!DownLimit"
- .Range("M12").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!TheoryPrice"
- .Range("D13").Formula = "=CATDDE|'FUTOPTTRADE<T>TXF" & sCode & " '!TrustBuyVol"
- .Range("D14").Formula = "=CATDDE|'FUTOPTTRADE<T>TXF" & sCode & " '!TrustSellVol"
- .Range("F13").Formula = "=CATDDE|'FUTOPTTRADE<T>TXF" & sCode & " '!TotalBuyCnt"
- .Range("F14").Formula = "=CATDDE|'FUTOPTTRADE<T>TXF" & sCode & " '!TotalSellCnt"
- .Range("H13").Formula = "=CATDDE|'FUTOPTTRADE<T>TXF" & sCode & " '!TrustBuyCnt"
- .Range("H14").Formula = "=CATDDE|'FUTOPTTRADE<T>TXF" & sCode & " '!TrustSellCnt"
- .Range("K14").Formula = "=CATDDE|'FUTOPT<FO>TXF" & sCode & " '!Open"
- .Range("A18").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyVol1"
- .Range("A19").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyVol2"
- .Range("A20").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyVol3"
- .Range("A21").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyVol4"
- .Range("A22").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyVol5"
- .Range("A23").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!TotalBuyVol"
- .Range("B18").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyPrice1"
- .Range("B19").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyPrice2"
- .Range("B20").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyPrice3"
- .Range("B21").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyPrice4"
- .Range("B22").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!BuyPrice5"
- .Range("C18").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellPrice1"
- .Range("C19").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellPrice2"
- .Range("C20").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellPrice3"
- .Range("C21").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellPrice4"
- .Range("C22").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellPrice5"
- .Range("D18").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellVol1"
- .Range("D19").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellVol2"
- .Range("D20").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellVol3"
- .Range("D21").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellVol4"
- .Range("D22").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!SellVol5"
- .Range("D23").Formula = "=CATDDE|'FUTOPT<FO>GTF" & sCode & " '!TotalSellVol"
- End With
- End If
- End Sub
½Æ»s¥N½X |
|
|
|
|
|
|
- ©«¤l
- 37
- ¥DÃD
- 10
- ºëµØ
- 0
- ¿n¤À
- 176
- ÂI¦W
- 0
- §@·~¨t²Î
- windows 7
- ³nÅ骩¥»
- office 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-6-22
- ³Ì«áµn¿ý
- 2014-1-16
|
·PÁ¨â¦ìC¤jªº°Q½×«á¦¨ªGªº¤À¨É
¦]¬°¤p§Ì¶È»Ýn5minªº¶q¸ê®Æ¦Ó¤w
¥hþ§ï±q1min¦¨5min©O?
ÁÂÁÂ |
|
|
|
|
|
|
- ©«¤l
- 37
- ¥DÃD
- 10
- ºëµØ
- 0
- ¿n¤À
- 176
- ÂI¦W
- 0
- §@·~¨t²Î
- windows 7
- ³nÅ骩¥»
- office 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-6-22
- ³Ì«áµn¿ý
- 2014-1-16
|
³oÃä¤p§Ì¦³Ó·Qªk¡A¦pªG¨Ï¥ÎDDEªº¦¨¥æ¶q
µM«á¥Î®É¶¡¨ÓºI¤î¨C¤ÀÄÁ(¦]¤H¦Ó²§)¬ö¿ý¤@¦¸¦¨¥æ¶q
§@Ó²³æ´îªk¡A´N¥i¥Hª¾¹D³o¤@¤ÀÄÁ©Î³o¤¤ÀÄÁ¡A¦¨¥æ¶q¼W¥[¤F¦h¤Ö
µ{¦¡·|¤£·|Åܱo²³æ¤@ÂI©O? |
|
|
|
|
|
|
- ©«¤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
|
³oÃä¤p§Ì¦³Ó·Qªk¡A¦pªG¨Ï¥ÎDDEªº¦¨¥æ¶q
µM«á¥Î®É¶¡¨ÓºI¤î¨C¤ÀÄÁ(¦]¤H¦Ó²§)¬ö¿ý¤@¦¸¦¨¥æ¶q
§@Ó²³æ´îªk¡A ...
momowu µoªí©ó 2012-10-22 11:36
µL½×¬O¤@¤ÀÄÁ¡B¤¤ÀÄÁ¡B¤Q¤ÀÄÁ¡B°ò¥»¤W§AÁÙ¬O»Ýn¦³¨C¤@´`Àôªº¦¨¥æ¶q°_©lÈ¡A
µ{¦¡½X¨Ã¤£·|¦]¦¹¦Ó¦³©Ò¼W´î¡AÅܪº¥u¬O¨Ï¥ÎºÝªº»Ý¨D¤£¦P½}¤F¡C |
|
|
|
|
|
|
- ©«¤l
- 12
- ¥DÃD
- 4
- ºëµØ
- 0
- ¿n¤À
- 62
- ÂI¦W
- 0
- §@·~¨t²Î
- winxp
- ³nÅ骩¥»
- sp3
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-10-22
- ³Ì«áµn¿ý
- 2018-11-13
|
ÁÂÁ¤À¨É~~~ |
|
|
|
|
|
|
- ©«¤l
- 93
- ¥DÃD
- 18
- ºëµØ
- 0
- ¿n¤À
- 111
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- OFFICE
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW¡E°ª¶¯
- µù¥U®É¶¡
- 2010-10-22
- ³Ì«áµn¿ý
- 2023-3-3
|
¦^´_ 18# c_c_lai
c_c_lai¤j§A¦n¡F
¯à§_§â ªþ¥ó¡iµ¦²¤°O¿ý¡jÄæ[¼¯¥x][Áú°ê][¤é¥»]¤]¼W¦C¨C30¬í°O¿ý¡H
³s¦P[¶qºA]1¤À¤]§ï30¬í~~
§Ú¥Î¨Ö´ê¾ã¦X³£¥¼¯à¦X·N..¬O§Ú¸ê½è¤Ó®t¡AÀµ½Ð¯àÀ°¦£..ÁÂÁÂ!!
§ÚEMail¡G[email protected] Åwªï«ü±Ð |
-
-
¶qºA.zip
(35.86 KB)
|
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|