Mikroicy
07-08-2016, 05:07 AM
Hy. I need some help with the coding. I have the following code written:
Sub test ()
Dim IEexp As Object
Dim Fname As String
Dim koda As String
Dim stran As String
Dim site As String
Fname = Sheets("Osnove").Range("ime").Text
koda = Sheets("Osnove").Range("B12").Text
stran = "webpage"
Set IEexp = New InternetExplorerMedium
IEexp.Visible = True
IEexp.navigate stran
Do
DoEvents
Loop Until IEexp.ReadyState = READYSTATE_COMPLETE
IEexp.Document.getElementById("Ribbon.Library-title").Click
IEexp.Document.getElementById("Ribbon.Library.Settings.DocumentLibrarySettings-Large").Click
Set IEexp = Nothing
End Sub
the internet Explorer opens on the page that I want, however, the ribbon dos not open (it is hidden). within a ribbon there is a button/folder I want to open. The id of this button is : "Ribbon.Library.Settings.DocumentLibrarySettings-Large".
any ideas?
Sub test ()
Dim IEexp As Object
Dim Fname As String
Dim koda As String
Dim stran As String
Dim site As String
Fname = Sheets("Osnove").Range("ime").Text
koda = Sheets("Osnove").Range("B12").Text
stran = "webpage"
Set IEexp = New InternetExplorerMedium
IEexp.Visible = True
IEexp.navigate stran
Do
DoEvents
Loop Until IEexp.ReadyState = READYSTATE_COMPLETE
IEexp.Document.getElementById("Ribbon.Library-title").Click
IEexp.Document.getElementById("Ribbon.Library.Settings.DocumentLibrarySettings-Large").Click
Set IEexp = Nothing
End Sub
the internet Explorer opens on the page that I want, however, the ribbon dos not open (it is hidden). within a ribbon there is a button/folder I want to open. The id of this button is : "Ribbon.Library.Settings.DocumentLibrarySettings-Large".
any ideas?