excel2016。如何 vba 抓取网页指定数据，并且自动更新至excel，网页登陆有用户名和密

1. excel2016。如何 vba 抓取网页指定数据，并且自动更新至excel，网页登陆有用户名和密

1、这个问题相对比较专业。建议再去知乎看看
2、另外咨询下淘宝看看卖VBA程序的人都给出什么方案
3、以下代码转载自网络：
Dim http  Set http = CreateObject("Microsoft.XMLHTTP")  http.Open "POST", "连接地址", False  http.send ""  If http.Status = 200 Then    selection.text=http.responseText  End If二是开启IE进程Sub test()  Set ie = CreateObject("InternetExplorer.Application") '设置变量  With ie '设置块    .Navigate ("需要打开的网页的网址") '打开网页    .Visible = True '是否显示ie窗口    While .readystate  4 '延迟等待页面加载完毕      DoEvents    Wend    For i = 22 To 49 Step 3 '取数循环      S = S & " " & .Document.all.tags("td")(i).innerTEXT  '取数据到变量，熟悉HTML的DOM可以修改这个实现各种内容    Next i  End With '块结束  S = LTrim(S) '删除左边空格  Application.SendKeys "^{F4}" '发送按键关闭当前浏览器标签  MsgBox S '显示结果  Set ie = Nothing '释放内存End Sub

2. excel vba如何读取网页中的某个数值。

用数据字典，dictionary  value，item 。 value不允许重复。
Sub test()
Dim name()
  Set dic = CreateObject("Scripting.Dictionary")
  a = [a65536].End(xlUp).Row
  For Each Cell In Worksheets("Sheet1").Range("A1:A" & a)
    If Not dic.exists(Cell.Value) Then
      dic.Add Cell.Value, Cell.Value
      On Error Resume Next
    End If
  Next
  name = dic.items
  For i = 1 To dic.Count
    Worksheets("Sheet1").Cells(i, 2) = name(i - 1)
  Next
End Sub

3. Excel 如何用VBA提取网页数据

1、首先打开Excel 2007工作表，点击想要把数据导入的位置，然后在菜单栏找到第五项'数据“，点击，在“获取外部数据”项下找到“自网站”并点击。
2、这时弹出来”新建 Web 查询“对话框，可以在“地址”一栏键入要添加数据的网页的地址。
3、添加完成后，点击“转到（G）”，下面会出来要添加网页的内容和黄色箭头，单击要选择的表旁边的黄色箭头，可以看到点击后黄色箭头变成绿色的对号，这表示内容已经选中了，然后单击“导入（I）”。
4、弹出来”导入数据“对话框，设置完成点击“确定”。
5、Excel表中显示“正在获取数据……”。
6、数据获取完成，之前选中的网页内容全部导入了Excel工作表里。

4. 在Excel中填入数据，用VBA进入指定网站进行查询？

VBA打开网站进行查询要受许多条件进行限制，例如网站需要登录，特别是登录要进行图形验证码填写的，编程会非常困难，甚至几乎无法实现。

VBA与浏览器交互有两种方式，一是黑客方式，使用CreateObeject("InternetExplorer.Application")打开一个浏览器对象，然后使用IE的地址栏浏览网页，以及使用IE的DOM结构对浏览器里面的输入数据、提交表单。此方式的难点在于要分析网页的DOM结构，找到填数的具体控件名称。好处是只要控件名称不变，哪怕窗口最小化、在后台、被遮挡都可以执行。

另外一种是外挂方式，使用AppActivate切换窗口，SendKeys发送按键，MouseEvent控制鼠标。此方式无需研究网页的DOM结构，但是屏幕分辨率不同、窗口位置不同、网页控件位置变化、特别是没有设置快捷键的时候，代码不得不修改。

5. 请帮个忙，如何用EXCEL VBA读取全部网页数据，我用数据-导入web查询功能，提示不可读取，就是网页数据不

查询的是什么网页？如果像手机号码归属地等之类的就简单啦

6. 如何通过Excel的VBA自动提取下面网页上多页数据？

直接复制就行了。
这个用VBA解决不了，只能用按键精灵，可以实现。

7. Excel 求教如何用VBA打开网页，并获取数据

http://club.excelhome.net/thread-507935-1-1.html
帮你百度了个看看

8. 如何将excel的数值自动录入网页里面？(VBA可以吗?)

很简单。
网页代码直接读取excel 就是了。
 
参考代码
 

Set xlApp = server.CreateObject("Excel.Application")
Set xlbook = xlApp.Workbooks.Open(excel文件)
Set xlsheet = xlbook.Worksheets(1)
 
for i=1 to 100
tmp1=trim(xlsheet.Cells(i, 1))
tmp2=trim(xlsheet.Cells(i, 2))
response.write tmp1&"    "&tmp2&""
next
 
set xlsheet=nothing
set xlbook=nothing
xlApp.quit