相关疑难解决方法(0)

我正在尝试将交互式绘图（或散景）图嵌入到 excel 中。

为此，我尝试了以下三件事：

1. 将 Microsoft Web Browser UserForm 嵌入到 excel 中，如下所示：

如何在 Excel VBA 表单中嵌入浏览器？

这有效并且可以加载在线和离线 html

2. 创建一个情节 html

'''

import plotly
import plotly.graph_objects as go


x = [0.1, 0.5, 1.0, 1.5, 2.0, 2.5, 3.0]
y = [i**2 for i in x]

fig = go.Figure()

fig.add_trace(go.Scatter(x=x, y=x, mode='markers', name="y=x", marker=dict(color='royalblue', size=8)))
fig.add_trace(go.Scatter(x=x, y=y, name="y=x^2", line=dict(width=3)))

plotly.offline.plot(fig, filename='C:/Users/.../pythonProject/test1.html')

3. 使用.Navigate本地 plotly.html 将excel 中的 webbrowser 对象重新指向。横幅弹出

“.... 限制此文件显示可以访问您的计算机的活动内容”

点击横幅，我遇到了这个错误：

可以在浏览器中打开相同的 HTML。

有没有办法在excel中显示交互式绘图？

我试图找到一种从yelp.com获取数据的方法

我有一个电子表格,其中有几个关键字和位置.我希望根据我的电子表格中已有的关键字和位置从yelp列表中提取数据.

我创建了以下代码,但它似乎得到了荒谬的数据,而不是我正在寻找的确切信息.

我想获得公司名称,地址和电话号码,但我得到的只是一无所获.如果有人在这里可以帮我解决这个问题.

Sub find()

Dim ie As Object
    Set ie = CreateObject("InternetExplorer.Application")
    With ie
        ie.Visible = False
        ie.Navigate "http://www.yelp.com/search?find_desc=boutique&find_loc=New+York%2C+NY&ns=1&ls=3387133dfc25cc99#start=10"
        ' Don't show window
    ie.Visible = False

    'Wait until IE is done loading page
    Do While ie.Busy
        Application.StatusBar = "Downloading information, lease wait..."
        DoEvents
    Loop

    ' Make a string from IE content
    Set mDoc = ie.Document
    peopleData = mDoc.body.innerText
    ActiveSheet.Cells(1, 1).Value = peopleData
End With

peopleData = "" 'Nothing
Set mDoc = Nothing
End Sub