自动按下网页上的“按钮”

时间:2018-11-16 16:58:54

标签: vba internet-explorer getelementbyid getelementsbyclassname

有人可以帮忙吗,我似乎无法使以下内容正常工作

Sub Automate_IE_Load_Page()
'This will load a webpage in IE
    Dim i As Long
    Dim URL As String
    Dim IE As InternetExplorer
    Dim objElement As Object
    Dim objCollection As Object

    'Create InternetExplorer Object
    Set IE = CreateObject("InternetExplorer.Application")
    IE.Visible = True
    URL = "https://Whatever"   'Not putting the URL up here
    IE.Navigate URL
    Do Until IE.ReadyState = 4: DoEvents: Loop


    IE.Document.getElementbyid("menuoptionCell_Excel2007+").Click '(Fails here)
    'Set Button = IE.Document.getElementbyid("menuoptionCell_Excel2007+")
    'Button.Click

End Sub

我也尝试过

   IE.Document.getElementsbyClass("contextMenuOptionTextCell")(0).Click

这是说我需要一个物体。我尝试了不同的方法,但似乎都没有用。我会说我在宽松地使用“按钮”一词,因为它实际上不是按钮,但不确定它叫什么。以下是网页上使用的身份,我不确定要按哪个身份,但似乎都不起作用

<td class="contextMenuOptionTextCell">
    <span class="contextMenuOptionText">Excel 2007+</span></td>

<td id="menuoptionCell_Excel2007+" style="vertical-align: top; width: 16px;"></td>

谢谢

迈克

0 个答案:

没有答案