Excel VBA：连接具有当前时间段不可用的单元格

问题描述

这是我的代码：

Dim wb As Workbook

  For Each wb In Workbooks

      If wb.Name = "Default.xlsm" Then

         For Each objConnection In ThisWorkbook.Connections

            bBackground = objConnection.OLEDBConnection.BackgroundQuery

            objConnection.OLEDBConnection.BackgroundQuery = False


            objConnection.Refresh


            objConnection.OLEDBConnection.BackgroundQuery = bBackground
         Next

      End If
   Next

我正在从weather.com查询中查询。但是，weather.com有时只会将信息放入其“天气”栏。每当他们没有“天气”的信息时，我都会收到错误消息。如果没有任何要刷新的数据，是否可以将单元格默认设置为“ N / A”？ 错误代码为"Run-time error '1004': Application-defined or object-defined error".

谢谢。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）