Excel 2010-从Web创建新文件的数据?

Excel 2010-从Web创建新文件的数据?,excel,rest,jira,excel-2010,Excel,Rest,Jira,Excel 2010,我正在尝试在excel工作簿中设置一个工作表,其中的数据来自web。这样我可以点击刷新,数据将再次从站点中提取,基本上实现了当前新流程的自动化 现在,我们正在将数据从站点导出到excel文件中,然后将其复制/粘贴到第二个工作簿中并在那里生成报告。我希望避免这样做,单击“刷新”应该刷新数据 我试图从OnDemand JIRA应用程序中获取数据,我们正在使用该应用程序跟踪我们的敏捷团队流程。(网址) 现在的问题是,如果我在Excel 2010中选择Data->From Web并输入上述URL,Exc

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

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

我试图从OnDemand JIRA应用程序中获取数据,我们正在使用该应用程序跟踪我们的敏捷团队流程。(网址)

现在的问题是,如果我在Excel 2010中选择Data->From Web并输入上述URL,Excel总是希望将数据保存到另一个Excel文件中……有没有办法让它将数据插入我已经打开的工作簿(我在中单击Data->From Web的工作簿?)?我现在似乎找不到任何方法来做这件事,所以非常感谢您的帮助


我对REST了解不多,但除了使用Data->From Web之外,还有更好的方法吗?请记住,我希望避免将数据从一个电子表格复制/粘贴到另一个电子表格,并且数据将每周刷新一次。谢谢大家!

这可能会让你开始

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

我猜URL返回的是Excel文件而不是HTML,所以您可能无法使用web查询。在VBA中,您可能只需执行
工作簿。打开(yourURLHere)
,然后将该文件复制并粘贴到现有工作簿中。除非您想解析XML,否则您将不得不执行复制/粘贴,但我不明白为什么会出现这样的问题-可以轻松实现自动化。对我来说,这不是一个大问题,但其他人似乎这么认为:(哈哈,怎么能自动化呢?