在IE11中使用自动完成功能填充Excel VBA文本框
，可以通过以下步骤实现：
- 首先，确保已经在Excel VBA中引用了Microsoft Internet Controls库。在VBA编辑器中，点击"工具" -> "引用"，勾选"Microsoft Internet Controls"。
- 创建一个WebBrowser对象，并将其添加到用户界面中的一个窗体或工作表上。可以使用以下代码创建WebBrowser对象：
Dim ie As Object
Set ie = CreateObject("InternetExplorer.Application")- 使用WebBrowser对象导航到目标网页。可以使用以下代码导航到指定网页：
ie.Navigate "https://example.com"- 等待页面加载完成。可以使用以下代码等待页面加载完成：
Do While ie.Busy Or ie.readyState <> 4
DoEvents
Loop- 找到目标文本框，并使用自动完成功能填充文本。可以使用以下代码找到文本框并填充内容：
Dim textbox As Object
Set textbox = ie.Document.getElementById("textbox_id")
textbox.Value = "填充的内容"在上述代码中，"textbox_id"是目标文本框的ID，可以通过查看网页源代码或使用开发者工具来获取。
- 最后，可以通过点击按钮或执行其他操作来提交填充的内容。
需要注意的是，自动完成功能的实现可能会受到网页的结构和动态加载的影响。在实际应用中，可能需要根据具体情况进行适当的调整和处理。
推荐的腾讯云相关产品：腾讯云CDN（内容分发网络），详情请参考：https://cloud.tencent.com/product/cdn
相关·内容
好的，我在Microsoft Access中有一个WebBrowser控件，我想将一个页面加载到该控件中并填充文本框值，然后将标签的值作为变量返回。
在任何人说之前，我已经在C#中完成了项目，但客户希望它在Access中。
我加载网页的代码如下：
Dim strURL As String
Dim objIE As Object
strURL = "https://mywepage.com"
Set objIE = Me.WebBrowser2.Object
objIE.Navigate strURL
在C#中，我使用以下代码填充TextBox值：
webBrowser1.Do
浏览 0提问于2011-10-17得票数 0
回答已采纳
有许多联机资源演示了如何在VBA Excel中使用Microsoft Internet Explorer控件来执行基本的IE自动化任务。当网页有一个基本结构时，这些方法就会起作用。但是，当网页包含多个框架时，它们可能很难处理。
我需要确定网页中的单个框架是否已完全加载。例如，这段VBA Excel代码打开IE，加载网页，遍历Excel工作表，将数据放入网页字段，执行搜索，然后将IE结果数据返回给Excel (很抱歉，我遗漏了站点地址)。
目标网页包含两个框架：
1)用于输入搜索值并执行搜索的searchbar.asp框架
2)显示搜索结果的searchresults.asp框架
在这个结构中，
浏览 4提问于2012-06-09得票数 2
1回答
编辑:更多信息-这个程序的目标是从现有的名称列表中提取，搜索网站，并带回相应的NPI数字。多亏了user @omegastripes，我被建议将我的注意力转移到XHR。我的问题是，如何使用提供者的名称填充搜索，并循环，以便在电子表格中返回剩余提供者的下一个单元格中的NPI。
相关，在搜索未填充任何内容的情况下如何处理
原始帖子:标题-你想继续吗？Internet Explorer弹出窗口- VBA
Internet安全弹出窗口阻止我的代码继续。通常情况下，我会禁用此请求，但由于使用工作计算机，我的计算机安全访问受到限制。
我的问题是，有没有办法使用VBA在此弹出窗口上单击“是”？
到目前为止，
浏览 0提问于2018-01-13得票数 2
使用Excel 2013自动登录网站并更改数据。
遵循代码可以完美地打开网站，输入用户名和密码，“登录”，然后打开下一个屏幕。
然后，它应该在新屏幕上再填充两个框，但它没有。它会生成一个RunTime错误，说明“需要一个对象”。
但是，如果我在错误行中按下"Debug“和"step through”，代码就能完美运行！
Option Explicit
Sub EnterWeb()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
Dim uRl As String
浏览 2提问于2015-05-13得票数 1
我正在尝试自动化的过程中，用户从网站下载文件摘录。我的问题是，一旦点击了'export‘按钮，一个javascript弹出窗口就会弹出各种提取的日期参数以及需要点击的最后一个'DOWNLOAD’按钮。在这个javascript弹出窗口期间出现了问题。一旦单击导出按钮并打开弹出窗口，powershell似乎会在脚本执行期间冻结，并且不允许执行任何进一步的命令。
我曾尝试使用WASP模块和选择窗口来抓取正确的IE进程窗口，但是，“选择窗口-Title”弹出窗口的名称- Windows Internet Explorer“|选择-First 1|设置窗口活动”命令不会执行，因为Pow
浏览 0提问于2013-06-26得票数 1
回答已采纳
1回答
我希望有人能帮忙。我正试图加快填写一个必须用excel中存储的信息完成数十次或数百次的with表单的过程。
为了做到这一点，我需要一个按钮来打开IE窗口并导航到某个网站的登录页面(我已经知道这一点了)。然后，用户可以登录并导航到需要填充的表单。然后，我希望用户能够返回excel页面，单击另一个按钮，它将自动填充几个下拉列表和文本框。
在Excel中，我已经有了一些允许用户搜索需要转到表单的特定信息集的代码，所以他们所要做的就是单击按钮将其传输到表单上。代码的第一个部分就是：
Public IE As Object
Public Sub OpenIE()
Set IE = Create
浏览 1提问于2016-11-11得票数 2
回答已采纳
1回答
我正在尝试使用VBA编辑这个文本框：
<td id="ctl00_PlaceHolderMain_ctl00_PlaceHolderMain_ProfileEditorValueAboutMe" class="ms-authoringcontrols" valign="top" style="padding-left:10px;padding-right:10px;"><span class="ms-profilevalue"><span id="ctl00_PlaceHold
浏览 1提问于2015-08-14得票数 0
回答已采纳
我在VBA相对较新(我了解基本知识，但不太了解其他)，我正在尝试设置一些代码来为我填写在线表单，但是当我运行我的代码时，我会得到一个438错误：
对象不支持此属性或方法
当它到达
ie.document.getElementById ("q")
我已经将HTML对象库和Microsoft internet控件添加到我的引用中。我看过无数的在线论坛。我甚至直接将整个脚本复制和粘贴到VBA中。没有什么能使它使用getElementById()。这是我的代码：
Sub internetstuff()
Dim ie As Object
Set ie = CreateObje
浏览 0提问于2019-06-14得票数 1
1回答
我想用VBA自动填写一个web表单，我有这样的问题:网页上有一个单选按钮，当我点击它时，tha按钮下面出现了一个文本框。我想将文本插入到这个文本框中，但是它只是不适用于VBA代码。
我尝试了多个代码，但文本没有出现。下面是我使用的代码：
Set allhyperlinks = ie.Document.getelementsbytagname("input")
For Each hyper_link In allhyperlinks
If hyper_link.getattribute("id") = "file_import_type_remot
浏览 4提问于2014-11-26得票数 0
回答已采纳
3回答
未找到元素时提示
、、、
我有通过点击elementId导航网页的VBA代码。
当找到elementId时，它提供了所需的结果。
我的问题是，当没有找到elementId时，没有提示错误。代码一直持续到最后。
例如，代码：
Ie.visible = True
Ie.navigate "www.abc.com"
Ie.document.getElementbyId("btk").click
在这里，我试图点击按钮btk。
但此按钮在网页上不可用。
我原以为我的代码会崩溃，但它一直持续到最后。
代码中没有使用错误处理。
浏览 3提问于2020-07-11得票数 0
回答已采纳
在下面的代码中，我试图将值放在弹出的单元格A1 (上传窗口中的地址)中；是否有方法将值放在sheet1中的单元格A1中(文件名文本框中)，然后按ok键，通过在VBA中模拟这个值，我想到了sendkey，但它不能工作。
下面是我的当前代码:我引用了两个库: Microsoft对象库、Microsoft Internet控件
Sub GetBase64()
Dim ie As New InternetExplorer
Dim doc As HTMLDocument
ie.Visible = True
ie.navigate ("http://webcodertools.com/i
浏览 4提问于2013-08-15得票数 0
回答已采纳
1回答
下面的excel vba宏将打开一个网页，并在文本框中插入"500010“。如果您在文本框中手动键入相同的数字，则会出现一个包含进一步选择的下拉框。编程数字输入时不会出现这种情况。我已经尝试了许多方法来以编程方式让这个下拉框出现，有几种方法在我的代码中显示，但都没有用。
Sub test()
URL = "http://www.bseindia.com/markets/equity/EQReports/StockPrcHistori.aspx?expandable=7&flag=0"
Set ie = CreateObject("InternetEx
浏览 1提问于2014-01-25得票数 0
嗨:我正在使用excel从这个网页中获取值：
如何获得excel VBA的代码以获得NIF、EJF、MOD和CEL的fiels？
我尝试使用getelementbyid("NIF")和"name“，但是没有结果。
谢谢!
Previos线程：
这是我使用的代码：
Sub AEAT()
Dim IE As Object
Application.ScreenUpdating = False
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate "htt
浏览 0提问于2017-08-19得票数 0
回答已采纳
如何使用Excel VBA填充使用javascript建议可用条目的文本框？手动填写文本框后，我将开始键入几个字母，文本框下方将显示可供选择的可用输入列表。我需要用鼠标单击或使用箭头键在javascript下拉框中导航到我想要的条目，然后单击enter。
这是与其他常规输入框的关键区别。如果我只是在输入框中输入文本，然后进入下一个输入框，而没有从下拉框中选择条目，则输入不会注册。所以我不能简单地找到输入框的元素并更改它的值。我相信我需要执行激活下拉框的javascript，然后我必须从中选择它。
输入文本框的HTML代码为：
<td id="input2" class=&
浏览 13提问于2018-08-30得票数 0
我正在开发的宏是设计从一个按钮启动的。该按钮触发一个循环子进程，该子进程只需触发子进程即可完成大部分工作。
子进程在IE中加载URL，然后导航到报表屏幕。在此之后，它等待指定的时间点(在流中值为X )。当X超过X时，IE被关闭，控件返回给父服务器，在重新启动子程序之前等待10秒。
当X从我的10秒测试计时器更改为一个小时时，问题就开始了。我怀疑VBA Excel中有些东西会衰退，所以大约5分钟后，我就会得到错误(这对我来说没有多大意义)。
感兴趣的是找出改变时间的方法来解决这个问题，看看有没有人知道解决问题的方法。
下面的代码..。提前感谢！
Private Sub OpenRepo
浏览 0提问于2019-12-30得票数 1
回答已采纳
我在使用IE.document.getElementbyID将文本加载到IE中的搜索框时遇到了问题，我正在使用的代码包括到目前为止使用的代码。我肯定我漏掉了什么东西。这是我这里包括的iframe代码的更新。
<iframe tabindex="-1" id="WorkdayApp" src="javascript:""" style="left: -1000px; top: -1000px; width: 0px; height: 0px; border-top-color: currentColor; border
浏览 2提问于2016-07-05得票数 0
我刚开始使用VBA，并试图编写一个脚本，与一个网站进行以下交互：
登录网站
在随后的网页中，从excel电子表格中填写名字和姓氏，然后单击"Submit“。
在随后的网页中，复制生成的id号。
我已经设法让我的代码登录到网站上通过getElementsById，因为网站的元素没有任何名称。但是，excel会为后续代码返回一个类型不匹配错误，以便与后续网页进行交互。
下面是后续网页中firstname、lastname、submit字段的HTML脚本：
“姓名”字段：
<input class="tfield-def-edit form-control&
浏览 0提问于2018-03-12得票数 0
回答已采纳
我希望从excel工作表中获取值，并将它们存储在数组中。然后，我想从数组中获取值，并使用它们来填充web表单。
我设法将值存储在数组中，并设法让VBA打开(IE)
代码运行，没有出现错误，但没有填充文本字段，也没有单击按钮。
(调试器指向[While .Busy]作为错误源，位于WITH块中)
如何填写表格(总共有3个文本框需要填写)？
还有一个下拉菜单，我需要从中选择一个值，但我需要填充文本框，然后再转到任务的那个部分。
Sub CONNECT_TO_IE()
the_start:
Dim ie As Object
Dim objElement As Object
Dim objCol
浏览 1提问于2018-10-31得票数 0
回答已采纳
我想通过选择特定日期从网站下载文件。检查显示href内容的元素，但无法单击它。
网页代码
<td>
<a href="/content/historical/EQUITIES/2021/FEB/cm02FEB2021bhav.csv.zip" target="new">cm02FEB2021bhav.csv.zip</a><br>
</td>
我的VBA代码
Dim files As String
Dim IE As Object
Set IE = CreateObject("Internet
浏览 7提问于2021-02-03得票数 0
下面是一个示例代码，它打开一个internet explorer窗口，导航到google，并通过唯一的id获取页面上的一些元素：
set ie = CreateObject("InternetExplorer.Application")
ie.navigate("www.google.com")
ie.visible = true
while ie.readystate <> 4
wscript.sleep 100
WEnd
set some_object = ie.document.getelementbyid("xjsc&#
浏览 0提问于2010-03-30得票数 3
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
即时通信 IM
对象存储活动推荐
腾讯云开发者
