标题：VBA如何清空版块

1楼

Guanx 发表于：2021/1/20 0:30:21

公式中：ClearBlock('自定');正确

VBA中怎样清除版块，

语法错误：Call ClearBlock('自定')

类型不匹配：Call ClearBlock("自定")

[此贴子已经被作者于2021/1/20 0:31:29编辑过]

2楼

yukizzc 发表于：2021/1/20 9:37:22

字符串用""不是''

3楼

Guanx 发表于：2021/1/20 11:45:58

错在哪里？

4楼

Guanx 发表于：2021/1/20 11:49:46

还是提示数据类型不匹配

5楼

yukizzc 发表于：2021/1/20 13:08:10

Set b = CreateObject("Stock.Block")
call b.ClearBlock("自选","自选股")

你要先创建对象

[此贴子已经被作者于2021/1/20 13:14:00编辑过]

6楼

Guanx 发表于：2021/1/20 14:19:33

谢谢

7楼

Guanx 发表于：2021/1/20 18:26:49

Set B = CreateObject("Stock.Block") 创建版块外部对象，正确

call b.open("自定1",1) 打开版块正确

msgbox b.count() 输出版块内数量正确

Call B.ClearBlock("自定","自定1") 清空版块正确

只有添加不成功

Call B.AddToBlock("NI03","自定1") 对象不支持属性和方法

需要加市场代码吗？如何加？

8楼

yukizzc 发表于：2021/1/21 9:27:28

AddStock 方法

AddStock(Market,Code)

添加指定品种到板块对象中

返回值：若添加成功返回1 否则返回0

参数	说明
Market	市场标识名称,例如"SH"表示上海市场
Code	品种代码

9楼

yukizzc 发表于：2021/1/21 9:29:39

你这函数写错，参数写错了都

10楼

Guanx 发表于：2021/1/21 19:43:49

Set Block1 = CreateObject("Stock.Block")

Call Block1.ClearBlock("自定","自定1")

Call Block1.AddStock("SQ","AG02")

最后一句没效果

没有具体对象，如何指定具体版块

共11 条记录, 每页显示 10 条, 页签: [1] [2]