Sub MAIN()
Set Block = CreateObject("Stock.Block")
For i = 4 To Range("A65536").End(xlUp).Row
代码 = Cells(i, 1)
市场 = Cells(i, 2)
分类名称 = Cells(2, 1)
板块名称 = Cells(2, 2)
Block.AddStock 市场, 代码
Next
Block.ToSave 分类名称, 板块名称
End Sub
执行了这个模块,但是金字塔没有添加上那几个案例上的品种啊
这里面哪里调用了金字塔的外部对象,没看到相应表达啊
在金字塔内的,工具-市场与板块
这边添加好和excel里对应的
| 分类名称 | 板块名称 | |
| 自选股 | 我的股票 |
OK了
我想问下,这个在哪里体现了和金字塔这边的对接,这个代码Set Block = CreateObject("Stock.Block")
就自动执行到金字塔了?
从自选股中删除一个股票的代码是啥
block.removestock好像不行,望指教,我要在代码里批量删除,再批量导入,需要改写下代码
每次更新,原来的就删掉了,Ok,谢谢