1. excel提取网页内容
参考:
Sub A1下载数据()
ReDim A2(1 To 200000, 1 To 15): A = 0
For i = 1 To 5
Sleep 2000 + 1000 * Rnd
With CreateObject("WinHttp.WinHttpRequest.5.1")
URL = "目标网页"
.Open "get", URL, False
.setRequestHeader "Host", "xxxxx"
.Send
Q1 = .responseText
Q1 = Replace(Q1, """", "")
Q1 = Replace(Q1, Chr(9), "")
Q1 = Replace(Q1, Chr(10), "")
Q1 = Replace(Q1, Chr(13), "")
Q1 = Replace(Q1, "=odd>", "=>")
End With
'Sheet1.[A2] = Q1
B1 = Split(Q1, "</tr><tr class=><td>")
For j = 1 To UBound(B1)
B2 = Split(B1(j), "</td>")
B3 = Split(Replace(B2(1), "<td>", ""), ",")
A2(A + 1, 1) = Replace(B2(2), "<td>", "")
A2(A + 1, 2) = Replace(B2(0), "<td>", "")
For K = 0 To 9
A2(A + 1, 3 + K) = B3(K)
Next
A = A + 1
Next
Application.StatusBar = i
Next
MsgBox A
With Sheet1
If .AutoFilterMode = True Then .AutoFilterMode = False
.Rows("2:600000").ClearContents
If A > 0 Then .[A2].Resize(A, 15) = A2
.Rows(1).AutoFilter '数据筛选
ActiveWindow.ScrollRow = 1
ActiveWindow.ScrollColumn = 1
End With
End Sub
2. excel抓取网页部分数据
excel提取部分数据的方法步骤
1、打开excel表格
2、例如提取第五位到第八位数据,我们在目标单元格内输入公式 =MID(A1,5,4)。A1代表:源数据单元格;5代表从第五个数字开始提取。4代表连续提取四位数。
3、按回车键,提取数据完成。
3. excel提取网址
方法一:点击打印按钮,在弹出的对话框里输入从某页到某页。
方法二:选定该页内容,右键复制,粘贴到一个新excel中。
4. 网页表单数据提取
一:利用Word里面的“索引”功能。
1、选中需要提取的文字,执行菜单命令“插入-引用-索引和目录”;
2、在“索引”选项页里面选择单击按钮“标记索引项”;
3、指定“选项”为“当前页”,根据需要可以指定提取之后显示的页码格式为加粗或者倾斜,单击“标记”;
4、此时标记索引项窗口并不会关闭,而且你还能在文档中找到并选中下一个需要提取的文字,重复步骤3;
5、如果没有其它需要提取的文字了,单击“关闭”;
6、在需要插入索引表的地方,执行菜单命令“插入-引用-索引和目录”,根据需要设置索引表的格式(比如分栏、对齐、缩进等风格),然后单击“确定”。
这样所有标记过索引的文字以及它们所在的页码就都提取出来了。
如果需要提取的文字有很多,那么或许也可以用VBA宏来自动标记索引(即相当于自动完成上面的1-5步骤)。但是前提是这些文字必须都有非常特定的格式,即可以保证当前文档中凡是具有这个格式的文本,都是需要提取索引的文本。
5. excel如何从网页提取表格
1、电脑中,打开一个浏览器,进入腾讯文档首页。
2、点击要导出到本地的文档打开。
3、点击菜单栏“文件”。
4、点击“导出为——本地excel表格”。
5、选择要存储的位置后,点击“下载”即可。
6、导出腾讯在线文档中的word也是一样的在腾讯在线文档中打开word,点击“文件——导出为——本地word文档”,选择存储路径,点击下载即可。
- 相关评论
- 我要评论
-