當前位置:→ 股海網股軟教程 → 正文
  • 導出的EXCEL股票代碼聯動股票軟件的方法

  • 相關簡介:股票代碼聯動

  • 文章來源:佚名發布時間:2020-08-19 22:09:11瀏覽次數:下載次數:0收藏:

緣起:
     我經常導出一些選股啊之類的股票列表到EXCEL,我想點擊股票代碼,股票軟件也跟著變化,至于為什么有這個需求,是因為某信軟件能按指標數值排序,但不能和K線窗口并顯,只能把排序數據導出,導出后我還想按順序查看每只股票

經過研究,方法如下:



Private Declare Function RegisterWindowMessage Lib "user32" Alias "RegisterWindowMessageA" (ByVal lpString As String) As Long
Private Declare Function PostMessage& Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any)
Public nMsg As Long
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
nMsg = RegisterWindowMessage("Stock")
If Left(Target, 1) = "6" Then
data = 7000000
Else
data = 6000000
End If
PostMessage 65535, nMsg, data + Target, 0
End Sub


考慮到可能很多朋友會用到,特分享出來  

導出的EXCEL股票代碼聯動股票軟件的方法

  • 下載資源所需積分

    0

  • 當前擁有積分

    0

上一篇:折騰必備OD使用視頻教程  下一篇:沒有了
股海網粉絲必讀
公式解密、改選股聯系QQ:78858997(有償服務)點擊查看詳情...
股海網指標公式幫助使用說明!新手必讀...
股海網新系統使用說明!新手必讀...
股海網VIP用戶組必讀...
說說看法 0條看法
推薦資源

關于我們 - 聯系我們 - 廣告合作 - 下載聲明 - 網站幫助 - 友情鏈接 - SiteMap - TOP
Copyright © 2020 銘網科技,All Rights Reserved.湘ICP備09016573號-10
本站所有廣告和與股海網均無關系,請股友自行判斷真假!股海網客服QQ:78858997
股海網股票軟件下載中心
股海網股票書籍下載中心 湘公網安備43108102000040號
免费试用时时彩平台