Excel 宏观调控

不幸的是，我的父母对使用电脑一点也不熟悉，而且我已经搬到了另一个城市，所以我无法直接帮助他们。他们需要每月登录电话服务提供商，打印到期发票。我正试图制作一个宏来“只需点击一个按钮”即可执行所有这些操作

到目前为止，我的代码是：

Private Sub CommandButton1_Click()

Set objIE = CreateObject("InternetExplorer.Application")
objIE.Top = 0
objIE.Left = 0
objIE.Width = 1027
objIE.Height = 768
objIE.AddressBar = 0
objIE.StatusBar = 0
objIE.Toolbar = 0
objIE.Visible = True

objIE.Navigate ("https://login.example.com")
Do
DoEvents
Loop Until objIE.ReadyState = 4

    SendKeys "{ENTER}" 'security pop up, press enter

Do
DoEvents
Loop Until objIE.ReadyState = 4

'write in login name and password

    objIE.document.GetElementByID("f_name_1").Value = "abababa"
    objIE.document.GetElementByID("password").Value = "cdc999"

'press enter, log in

    SendKeys "{ENTER}"

Do
DoEvents
Loop Until objIE.ReadyState = 4

'and here I stuck

End Sub

但有一次我被卡住了。不幸的是，当您登录网站时，导航按钮的代码如下所示：

<a class="cufon_w" id="tempID" href="fakt.do">

以及：

但这两种方法都不起作用（我想是tempID，但还是试过了）

---

有人尝试过类似的方法吗？或者知道任何解决方案吗？

尝试时发生了什么：

objIE.document.GetElementByID（“tempID”）。单击

？这应该行得通。您可以尝试避免延迟绑定。我以前见过更通用的“document.GetElementByID（“”）”返回一些奇怪的对象。您可能希望添加对Microsoft Internet控件和Microsoft HTML对象库的引用，并较少地依靠VBA为您选择类型。我不能保证这会解决它，但它可能会给你更多有用的信息。可以让你直接帮助他们。

objIE.document.GetElementByID("tempID").Click

objIE.document.GetElementByClassName("cufon_w").Click