通过VBA在popup警报窗口中按OK

有一个问题,我写了一个macros,刷新每2分钟,从网页上传数据,我的macros的最后一步是使用“文本到列”function,以便它将被拆分成很好的列。

问题出现在这里,每当它执行这个“文本到列”,它会问我是否要覆盖列(和我做),但我需要按手动确定。

有什么办法让VBA在警报中按下这个OKbutton吗?

非常感谢你!

您可以在生成对话框的指令之前添加一个DoCmd.SendKeys

在调用之前,只需添加Application.DisplayAlerts = False ,然后将其设置为True

http://msdn.microsoft.com/en-us/library/office/aa175241%28v=office.11​​%29.aspx


更新:我只是跑了一个testing,它不会默认提示我。 你可以发布你使用的代码吗? 我只是做了:

 Public Sub Test() Dim r As Range Set r = ActiveWorkbook.Sheets(1).Columns("A:A") r.TextToColumns Destination:=Range("B1") End Sub 

这个链接说DisplayAlerts解决scheme已经为其他人工作。

您应该使用鼠标点击function在它最大化窗口之前,所以x,ybutton的坐标保持不变使用Windows lib 32