I can't find a way to click those tabs programatically. The data, at least the tables so far, can be downloaded though as the tabs are only used to select which division is visable, all the data is on the page. In the following function the 6 divisions are copied into a file (could be cleaned up by writing a function to do this). IE is then redirected to this file.
If this is the sort of thing you are looking to do you might be better off looking at Microsofts HTML Object Library or XML in stead of IE and using get ot post to get the data.
I have used references to microsoft HTML object library, Microsoft internet controls and Microsoft scripting runtime for this function.
Function main(url_string As String)
Dim oIE As InternetExplorer
Dim oDivElement As HTMLDivElement
Dim fsoObject As Scripting.FileSystemObject
Dim FileHandle As Scripting.TextStream
Set oIE = CreateObject("InternetExplorer.Application")
oIE.Visible = True
oIE.navigate url_string
Do While oIE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
Set fsoObject = New FileSystemObject
Set FileHandle = fsoObject.CreateTextFile((ThisWorkbook.Path & "\Output.html"), True)
Set oDivElement = oIE.document.getElementById("incinterimdiv")
FileHandle.WriteLine ("Quarterly income")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine (oDivElement.innerHTML)
Set oDivElement = oIE.document.getElementById("incannualdiv")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine ("Annual income")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine (oDivElement.innerHTML)
Set oDivElement = oIE.document.getElementById("balinterimdiv")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine ("Quarterly balance")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine (oDivElement.innerHTML)
Set oDivElement = oIE.document.getElementById("balannualdiv")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine ("Annual balance")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine (oDivElement.innerHTML)
Set oDivElement = oIE.document.getElementById("casinterimdiv")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine ("Quarterly cash flow")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine (oDivElement.innerHTML)
Set oDivElement = oIE.document.getElementById("casannualdiv")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine ("Annual cash flow")
FileHandle.WriteLine ("<BR> <BR>")
FileHandle.WriteLine (oDivElement.innerHTML)
FileHandle.Close
Set FileHandle = Nothing
Set fsoObject = Nothing
Set oDivElement = Nothing
Set oIE = Nothing
End Function