SL8*_*L8R 5 excel vba excel-web-query
因此,我一直在为我的公司做大量的 excel vba(不是真正高级的东西)“开发”,并且遇到了一个我似乎无法解决的问题。
该应用程序的作用:QC 检查客户框中的错误,然后通过记下详细信息记录任何发现的错误,然后使用我在互联网上找到的 Web 查询功能以及解析器类将信息提交到 google 表单,谷歌表单然后写入谷歌表格,在其中合并我使用这些信息在谷歌表格/仪表板上显示当前错误率和样本大小。QC 使用 Microsoft Windows Surface Pro 平板电脑在 Excel 中运行应用程序并提交他们发现的错误。
问题:在非常随机的时候,一些平板电脑在尝试提交对谷歌表单的响应时会出现错误(错误出现在网络查询模块中),我不知道是什么原因造成的。有时是所有平板电脑都有问题,有时只是部分平板电脑出现问题,通常通过重新启动应用程序或等待几分钟即可解决问题。
我的猜测:
我尝试过的解决方案:
我使用的网络查询代码:
Public Sub CreateWebQuery(Destination As Range, url As String, Optional WebSelectionType As XlWebSelectionType = xlEntirePage, Optional SaveQuery As Boolean, Optional PlainText As Boolean)
With Destination.Parent.QueryTables.Add(Connection:="URL;" & url, Destination:=Destination)
.Name = "WebQuery"
.RefreshStyle = xlOverwriteCells
.WebSelectionType = WebSelectionType
.PreserveFormatting = PlainText
.BackgroundQuery = False
.Refresh
If Not SaveQuery Then .Delete
End With
End Sub
Run Code Online (Sandbox Code Playgroud)
我还可以尝试哪些其他事情?
编辑:就其价值而言,平板电脑运行的是 Microsoft Office 365 - 64 位。而且Windows也是64位版本。
| 归档时间: |
|
| 查看次数: |
719 次 |
| 最近记录: |