Question

我正在尝试在我的Excel工作簿中设置一个工作表，其中数据来自Web。这样我可以点击刷新，数据将再次从网站中提取，基本上自动化当前的新流程。

现在我们将数据从站点导出到excel文件，然后将其复制/粘贴到第二个工作簿并在那里生成报告，我想避免这样做，单击刷新应该刷新数据。

我试图提取的数据来自我们用于跟踪敏捷团队流程的OnDemand JIRA应用程序。（网址https://mycompany.atlassian.net/sr/jira.issueviews:searchrequest-excel-all-fields/10101/SearchRequest-10101.xls?tempMax=1000）

现在的问题是，如果我选择数据 - ＆gt;从Excel 2010中的Web和我输入上面的URL，Excel总是希望将数据保存到另一个Excel文件....有什么办法可以让它在我已经打开的工作簿中插入数据（我点击的那个）数据 - ＆gt;来自Web in？）？我现在似乎无法找到任何方法，所以任何帮助都表示赞赏！

我对REST知之甚少，但除了使用数据之外，还有更好的方法吗？＆gt;来自网络？请记住，我希望避免将数据从一个电子表格复制/粘贴到另一个电子表格，并且数据将每周刷新一次。谢谢你！

Answer 1

这可能会让你开始......

Sub DoUpdate()

Const URL As String = "https://mycompany.atlassian.net/sr/jira.issueviews:" & _
                       "searchrequest-excel-all-fields/10101/" & _
                       "SearchRequest-10101.xls?tempMax=1000)"

Dim wb As Workbook


    Set wb = Workbooks.Open(URL) 'open workbook from web

    'clear previous data
    ThisWorkbook.Sheets("data").Range("A1:H200").ClearContents

    'copy new data over
    wb.Sheets(1).Range("A1").CurrentRegion.Copy _
                      ThisWorkbook.Sheets("data").Range("A1")


    wb.Close False 'close and don't save any changes

End Sub

Excel 2010 - 来自Web的数据创建新文件？

1 个答案: