分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册

软件名称:[B]联动股票软件的方法(导出的EXCEL股票代码)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:0 Bytes
官方主页:Home Page
更新时间:2020-08-20 00:06:41
软件简介:

 因为经常导出一些选股啊之类的股票列表到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
 
这种方法,估计不少朋友都是会用到的,也有不少人会的。

[url=http://www.70822.com/soft/sort013/sort05/down-150039.html]联动股票软件的方法(导出的EXCEL股票代码)[/url]

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明:本站所有股票公式软件资料均网上公开收集,如侵权请联系删帖。站内所有广告,均与本站无关!
Copyright © 2003-2024 70822.Com. All Rights Reserved .
页面执行时间:31.25000 毫秒