关于VBA中引用的问题请教

kwin_zh

各位大神好，
小白一枚，已经知道如何用VBA打开并填入数据到指定网页，并且点击按钮提交。
但是不知道如何批量操作这样的动作，代码如下：

Sub 自动填写表单2()

   On Error Resume Next
     With CreateObject("internetexplorer.application")
         .Visible = True
         .Navigate "http://www.123456.html"  '打开网站
         Do Until .ReadyState = 4
             DoEvents
         Loop
        .Document.getelementbyid("realName").Value = "张三"                    '输入名字
        .Document.getelementbyid("idCardNo").Value = "13467985201"     '输入手机号
        .Document.getelementbyid("mobile").Value = "356"                         '输入工号
        .Document.all("button").Click                                                            '点击搜索


     End With
End Sub

----------------------------------------
比如，我有一个表格，有员工姓名、手机号、工号三项，

这样的数据有3000条，怎样才能批量填写他们到网页中呢？
是不是要引用，如何引用？


另外，点击搜索有，出来的结果页面要么提示“”没有找到该员工信息“”，要么就是找到了信息，并且最后又一个“”新增按钮“”，
如何实现在出现新增按钮后自动点击“”新增“”按钮并继续下一个循环引用填写网页？


谢谢大神指教!

kwin_zh

自己先顶上来让大神看到！

大神》快来看这里！！！

大神！！！

kwin_zh

大神，你在哪里

kwin_zh

大神~~快快解救我   

kwin_zh

111111111111

8521976

不懂一块来学习！

kwin_zh

已经大概搞定，除了循环引用要再试验下~~