Please help solve why IE.Document.all("nd-fsc-icn nd-fsc-icn16 nd-fsc-icn-FullScreen-B").click does not work

[This is Driving Me Nuts]

Option Explicit

Sub ie_automated ()

Dim IE As InternetExplorer

Dim sURL As String

sURL = "goldprice.org/silver-price.html"
Set IE = New InternetExplorer

With IE

.Top = 373
.Left = 25
.Width = 1700
.Height = 600
.AddressBar = 0
.Toolbar = 0

.Visible = True
.Navigate sURL
'Application.Wait Now + TimeSerial(0, 0, 10)
Do Until Not .Busy And .ReadyState = 4
DoEvents
Loop


IE.Document.all("nd-fsc-icn nd-fsc-icn16 nd-fsc-icn-FullScreen-B").click


'nd-fsc-icn nd-fsc-icn16 nd-fsc-icn-FullScreen-B
'goldprice.org/silver-price.html
'IE.Document.all("nd-mnu-btn").Click

End With

Do Until Not IE.Busy
DoEvents
Loop

Set IE = Nothing
Err.Clear


End Sub

 

[Domenic]

Try ...

IE.Document.getElementsByClassName("nd-fsc-icn nd-fsc-icn16 nd-fsc-icn-FullScreen-B")(0).click

However, here's another way...

IE.Document.getElementByID("mnuTlb10").getElementsByTagName("button")(0).click

Hope this helps!

 

[This is Driving Me Nuts]

Thanks for trying but neither option worked.

I still get the following run time error

 

[Domenic]

It may be that there are multiple instances of Internet Explorer that persist. Try the following...

1) Make sure that you manually close any and all instance of Internet Explorer, if any are open.

2) Look at the processes in the Task Manager under Details, and see if there are one or more instances of iexplore.exe. If so, get rid of them by selecting each one, and then clicking on End Task for each of them. (Note that you can get to the Task Manager by pressing Ctrl+Alt+Del and selecting Task Manager.)

In addition, it may also be a good idea to explicitly quit Internet Explorer when finished. So you would add IE.Quit just before Set IE = Nothing .

Hope this helps!

 

[This is Driving Me Nuts]

Thanks again I tried your suggestion but I still get