老师您好:
Forms("1-报价输入").Controls("btn-ksbj").PerformClick() ' 模拟按键,进行一个计算,每次计算时间都在10-600秒之间
Forms("设计输入").TimerEnabled = True '启动计时器
If bjcgbz=1 And bjlcjlbz = 2 '这两个参数是计算完成后的标志值。
With wb.AddTable("","Table1")
.CreateFromDataTable(DataTables("产品报价表"),True,"材料规格 is not null or 金额>0","","类别","材料名称","材料规格","单位","数量","单价_元","金额" )
End With
End If
在计时器中:
e.Form.TimerInterval = 5000
If bjcgbz=1 And bjlcjlbz = 2 Then '报价成功标志
e.Form.TimerEnabled = False
End If
我的意思是,计时器当检测到两个标志值时,就终止计时器,创建table1,不知我哪里错了,始终不能创建表taible1,找了很长时间,也没有发现问题,麻烦老师,给看看,问题出在什么地方?
[此贴子已经被作者于2022/7/3 15:05:13编辑过]