Vba 如何单击此按钮？_Vba_Button_Click_Src

Vba 如何单击此按钮？

vba button

Vba 如何单击此按钮？,vba,button,click,src,Vba,Button,Click,Src,大家好，我是Visual Basic的初学者。非常感谢你的帮助如何在网页中单击此按钮 <a class="buttonRed" href="what_would_you_do.html" onclick="this.blur();"> <span>Get Started</span> </a> 实际上这不是一个按钮。它的锚定标签。将代码编写为 <a class="buttonRed" href="what_would_you_d

大家好，我是Visual Basic的初学者。非常感谢你的帮助

如何在网页中单击此按钮

<a class="buttonRed" href="what_would_you_do.html" onclick="this.blur();">
  <span>Get Started</span>
</a>

实际上这不是一个按钮。它的锚定标签。将代码编写为

  <a class="buttonRed" href="what_would_you_do.html">
   <span>Get Started</span>
   </a>

它将重定向到“what_would_you_do.html页面（如果它在根目录中）

简短示例，该示例对我有效，使用简单html文件测试：

ClickA.html:

<!DOCTYPE HTML>
<html lang="en">
<head>
    <title><!-- Insert your title here --></title>
</head>
<body>
    <a class="buttonRed" href="what_would_you_do.html" onclick="this.blur();">
    <span>Get Started</span>
</a>
</body>
</html>

' Add References:
' - Microsoft HTML Object Library
' - Microsoft Internet Controls

Sub test()
      Dim Browser As InternetExplorer
      Dim Document As htmlDocument
      Set Browser = New InternetExplorer

      Browser.Visible = True
      Browser.navigate "C:\Temp\VBA\ClickA.html"

      Do While Browser.Busy And Not Browser.readyState = READYSTATE_COMPLETE
          DoEvents
      Loop

      Set Document = Browser.Document
      Dim anchorElement As HTMLAnchorElement
      Set anchorElement = Document.getElementsByClassName("buttonRed").Item(Index:=1)
      anchorElement.Click
      Set Document = Nothing
      Set Browser = Nothing
  End Sub

你到底想做什么？重定向到某个页面或在锚定单击时调用该函数？我想自动化一些事情。我已成功启动IE。我已成功导航到url。从网站的第一页，我想通过单击此按钮导航到第二页。我不知道如何自动化此操作（如何单击此按钮）实际上，这不是一个按钮。它的锚定标签。将代码编写为