Exce表格网

提取网页excel数据(excel提取网页内容)

来源:www.0djx.com  时间:2023-03-24 09:40   点击:271  编辑:表格网  手机版

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文档”,选择存储路径,点击下载即可。

顶一下
(0)
0%
踩一下
(0)
0%
相关评论
我要评论
用户名: 验证码:点击我更换图片