ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

   
易厚学堂-专业的职场技能充电站 永久免费,网表让Excel秒变数据库 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
Excel不给力? 何不试试FoxTable! Excel函数公式学习大典 高效办公必会的Office实战技巧 免费下载Excel行业应用视频
300集Office 2010微视频教程 Tableau-数据可视化工具 ExcelHome出品 - VBA代码宝免费下载 13门Excel免费公开课任你学
你的Excel 2010实战技巧学习锦囊 欲罢不能, 过目难忘的 Office 新界面 免费的Excel考勤计算系统
查看: 601|回复: 9

[求助] 关于抓取网络数据的问题

[复制链接]

TA的精华主题

TA的得分主题

发表于 2018-2-13 21:22 | 显示全部楼层 |阅读模式
之前请朋友帮写过一段代码,来抓取网页上的赔率数据,根据图1中的公司,来得到图2的效果,后因该网站页面做了调整,现在在来运行不仅非常缓慢,而得不到之前的数据了(见图3),小弟愚钝实在修改了多次仍不行,求助各位大神给予帮助!!!代码及文件见最下面。
如果各位大神方便,能否帮这加一个自动刷新的功能,时间可自己修改一般1小时即可。

file:///d:\Documents\Tencent Files\21259\Image\C2C\]9TI7PRH1K8NCTXDTKO3M{G.jpg
111.jpg
图1
222.png
图2
QQ图片20180213211606.png
图3
源文件及代码如下: 空白.rar (19.21 KB, 下载次数: 4)

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-2-13 22:05 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-2-14 08:34 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-2-14 09:06 来自手机 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-2-14 15:18 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-2-16 16:03 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-2-16 18:16 | 显示全部楼层

demo.zip (50.58 KB, 下载次数: 17)

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-2-17 10:32 | 显示全部楼层
sunan0317 发表于 2018-2-16 18:16
重新写了代码。
工作簿运行就可以自动获取数据,工作簿保持打开状态,每30分钟会再次自动运行获取数 ...

多谢多谢,不知能否俺自己的要求选择相应的公司呢?
我先学习下代码

TA的精华主题

TA的得分主题

发表于 2018-2-17 13:53 | 显示全部楼层
houniao 发表于 2018-2-17 10:32
多谢多谢,不知能否俺自己的要求选择相应的公司呢?
我先学习下代码

这个功能应该不难实现。
你会一些vba动动脑筋,实际操作下就能实现。

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-2-24 11:51 | 显示全部楼层
sunan0317 发表于 2018-2-17 13:53
这个功能应该不难实现。
你会一些vba动动脑筋,实际操作下就能实现。

感谢老师的解答,另外对于如何筛选自己需要的公司,一直没研究明白,我对VBA确实很菜,期望老师给与帮助。
还有3个小问题一并请教:
1、一下代码,需要两个网址,能否有简单的方式进行输入呢
        .Open "GET", "http://1x2.nowscore.com/1501947.js", False
'         .setRequestHeader "Content-Type", "application/json"
          .setRequestHeader "Referer", "http://op1.win007.com/Oddslist/1501947_4.htm"
2、本次抓取的是单场比赛的,能否在一个文件里实现抓取14场左右的比赛数据,分别写到不同的工作表中sheet1.....sheet14
3、关于网页最底部的两个数据如何也能抓取。 11111111.png


您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

关注官方微信,高效办公专列,每天发车

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2018-11-19 08:36 , Processed in 0.110670 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 2001-2017 Wooffice Inc.

   

沪公网安备 31011702000001号 沪ICP备11019229号

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:徐怀玉律师 李志群律师

快速回复 返回顶部 返回列表