No element ID or Name

[MrToolman]

Hi Everyone,

First time poster here although I've been referencing many posts from this forum for years. So much great info here.

I'm trying to submit package info to the UPS site to automatically return the shipping rates. For a single package I'm able to do it. When trying to set up for multiple packages I got jammed up and can't figure this out. Hopefully someone can help.

Below you can see the 'inspect element' code for the First, Previous, Next, and Last button options.

<button *******="PackageDetailJS.moveToFirst(3, packageDetailInputForm); return false;"><<</button>
<button *******="PackageDetailJS.moveToPrevious(3, packageDetailInputForm); return false;">< Prev</button>
<button class="next" *******="PackageDetailJS.moveToNext(3, packageDetailInputForm); return false;">Next ></button>
<button class="next" *******="PackageDetailJS.moveToLast(3, packageDetailInputForm); return false;">>></button>

So far I've been referencing elements using the 'Name' or 'ID' fields, but this doesn't have any. So, how do I reference and click the "Next" button?

Thanks ahead of time for any help with this.

 

[MrToolman]

Sorry, the code displayed the button itself and I couldn't find the Edit Post button. Here's the code below (minus the <button___ button=""><button and /button>)

class="next" *******="PackageDetailJS.moveToNext(3, packageDetailInputForm); return false;">Next >

The "3" represents the next page or entry number I'm attempting to move to. I already manually entered data in the first two.</button___>

 

[MrToolman]

I'm sorry for my first two posts not coming out correctly. Apparently I'm not allowed to edit my own posts as a new member and I don't see a preview button in the reply options.

Hopefully this image will clarify what I'm working with here.

How do I tell VBA to click the next button?

 

[John_w]

Try this to find and click the 'Next >' button. Requires reference to MS HTML library.

    Dim IE As Object
    Dim HTMLdoc As HTMLDocument
    Dim buttons As IHTMLElementCollection, nextButton As HTMLButtonElement, i As Long
    Set HTMLdoc = IE.document  'IE is your InternetExplorer object with the page loaded
    Set buttons = HTMLdoc.getElementsByTagName("button")
    Set nextButton = Nothing
    While i < buttons.Length And nextButton Is Nothing
        If buttons(i).innerText = "Next >" Then Set nextButton = buttons(i)
        i = i + 1
    Wend
    If Not nextButton Is Nothing Then
        nextButton.Click
    Else
        MsgBox "Next > button not found"
    End If

 

[John_w]

Please post links to your cross-post(s).