VBA 应用程序定义或对象定义错误

编程问答 2022-05-31

问题描述

我是 VBA 新手，想运行以下代码块以检索股票价格。看起来它有点工作，因为当我运行宏时，我得到输入股票代码的提示，但是当我这样做时，我收到一条错误消息，指出应用程序定义或对象定义错误。我不确定应用程序网络服务是否已被弃用或完全不同。我正在使用 macbook pro 和 excel 版本 16.42 - 我知道 activeX 功能不适用于此操作系统，但我假设因为提示已启动，它无论如何都应该工作。任何帮助将不胜感激。

这是我的代码：

Option Explicit

Sub Declaring_Variables()

Dim TickerName As String

TickerName = InputBox("Ticker Symbol")

Dim CurrentPrice As String

CurrentPrice = Application.WebService("finance.yahoo.com/d/quotes.csv?s=" & TickerName & 
"&f=l1")

MsgBox "Text Format: " & CurrentPrice & Chr(10) & _
    "Number Format: " & Application.NumberValue(CurrentPrice)

End Sub

解决方法

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

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

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

excelexcelyahoo-finance