用excel自动填写网页并提交

 时间:2026-02-15 20:49:26

1、打开office excel 2003,依次点击菜单栏:【工具】--->【宏】--->【Visual Basic 编辑器】。

用excel自动填写网页并提交

2、打开Visual Basic 编辑窗口如下图。

用excel自动填写网页并提交

3、下面,我们使用excel自动打开百度代码如下:

Sub Main()

    Dim ie As Object

    Set ie = CreateObject("InternetExplorer.Application")

    ie.Visible = True

    ie.Navigate "http://www.baidu.com"

End Sub

点击运行按钮,自动打开百度首页

用excel自动填写网页并提交

4、然后在百度搜索框内填写搜索的内容“你好,百度”,代码如下:

ie.Document.getElementById("kw").value = "hellow world" 。其中kw为百度搜索框的ID,至于如何获得网页中元素的ID号,请自己百度一下。 

用excel自动填写网页并提交

5、最后我们得到百度的【百度一下】按钮的ID号,并点击按钮:ie.Document.getElementById("su").click,运行后结果如下图:

用excel自动填写网页并提交

6、整段代码如下:

Sub Main()//主程序入口

    Dim ie As Object//定义的浏览器变量

    Set ie = CreateObject("InternetExplorer.Application")//创建浏览器变量

    ie.Visible = True//显示浏览器

    ie.Navigate "http://www.baidu.com"//打开百度首页

    While ie.ReadyState <> 4 Or ie.Busy = True//检测浏览器是否完全打开

      DoEvents//假如浏览器还没有完全打开,则等待

    Wend

    ie.Document.getElementById("kw").Value = "hellow world"//在浏览器

//中填写搜索内容:“hellow world”

    ie.Document.getElementById("su").Click//点击搜索按钮

End Sub

  • execl窗体如何重新获得焦点呢?
  • 如何在Excel VBA中设置GetOpenFilename的参数
  • Excel VBA如何获取数组索引的范围
  • 如何利用VBA代码自动隐藏表格特定行
  • Excel利用VBA制作进度条加载效果
  • 热门搜索
    怎么调电脑屏幕亮度 大脑供血不足怎么办 怎么减肥最快 孩子为什么厌学 黄瓜怎么做好吃 怎么做花卷 红烧甲鱼的家常做法 怎么开通花呗收款 肝火旺盛怎么调理 鹅肉怎么做好吃