从JavaScript表（？）导入数据到Excel
我试图导入数据从这里的大量date： https ： //demanda.ree.es/movil/peninsula/demanda/tablas/2014-11-03/2
一旦/如果这是可能的，我想自动化它，所以它检索给定的一组date的数据。 说，整个2013年。
我无法在网页源中find任何提示从中检索数据的提示。 我试过使用以下方法导入数据：
数据/从网页：获取javascript错误
打开/其他网站位置：只需检索填充灰色单元的工作表，没有数据。
谢谢你的帮助！
使用以下链接：
https://demanda.ree.es/WSvisionaMovilesPeninsulaRest/resources/maxMinPeninsula?callback=angular.callbacks._0&curva=DEMANDA&fecha=2013-01-01 https://demanda.ree.es/WSvisionaMovilesPeninsulaRest/resources/prevProgPeninsula?callback=angular.callbacks._1&curva=DEMANDA&fecha=2013-01-01 https://demanda.ree.es/WSvisionaMovilesPeninsulaRest/resources/demandaGeneracionPeninsula?callback=angular.callbacks._2&curva=DEMANDA&fecha=2013-01-01 https://demanda.ree.es/WSvisionaMovilesPeninsulaRest/resources/coeficientesCO2?callback=angular.callbacks._3&curva=DEMANDA&fecha=2013-01-01 使用“fecha”参数设置date。 似乎是不可能一次得到整整一年，所以你应该迭代到这个链接的调用，并将“fecha”更改为2013-01-02，2013-01-03等每个月。
Muchas gracias @ miguel-febres！ 现在它可以或多或less地工作。 你从哪里find链接？ 🙂
- 它运行一些10-20循环，并返回一个地址错误，我刚刚再次启动macros，它的工作原理…很奇怪。
Sub Macro1（）Application.DisplayAlerts = False
Do Workbooks.OpenText Filename:="https://demanda.ree.es/WSvisionaMovilesPeninsulaRest/resources/demandaGeneracionPeninsula?callback=angular.callbacks._2&curva=DEMANDA&fecha=" & ActiveCell.Value & "" Range(Selection, Selection.End(xlToRight)).Select Selection.Copy Windows("Spain").Activate ActiveCell.Offset(1, 0).Range("A1").Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True 'close table Windows("demandaGeneracionPeninsula").Activate ActiveWindow.Close ActiveCell.Offset(-1, 1).Activate Loop Until ActiveCell.Value = ""
结束小组
现在我只需要parsing结果.. 🙂