Browser out of date

[Pak Mariman]

Hi,

I am trying to grab data from e.g. this URL:

USD255087S - Spoon or similar article - Google Patents

by using Get Data > Web Query.

When trying to connect, there is no data available, and the Web Preview tab in the query says my browser is out of date.

Under the hood, excel apparently uses a (...built in...?) Internet explorer engine, and I cannot seem to change the default browser to another more up-to-date one.

How to fix?

Thanks!

 

[mole999]

presuming your IE is 11, what code are you using to pull data from the web

 

[Pak Mariman]

I select Data>From Web from the Ribbon, then add the URL from above.

In the Navigator I select "Web View" and see the following:
Your Browser Isn't Supported By Google Patents

It looks like you're using an old browser which isn't supported by Google Patents. To use Google Patents, you'll need an up-to-date browser.

That is how far I got. There is not much code in the Advanced Editor yet, but here it is:

let
    Source = Web.Page(Web.Contents("https://patents.google.com/patent/USD255087S/en"))
in
    Source

 

[mole999]

not sure from your very brief tidbit of what you are actually using

one way might involve

Function GetIE() As Object
'return an object for the open Internet Explorer window, or create new one
  For Each GetIE In CreateObject("Shell.Application").Windows() 'Loop to find
    If (Not GetIE Is Nothing) And GetIE.Name = "Internet Explorer" Then Exit For 'Found!
  Next GetIE
  If GetIE Is Nothing Then Set GetIE=CreateObject("InternetExplorer.Application") 'Create
  GetIE.Visible = True 'Make IE window visible
End Function

Example Usage:

Sub demo()
    Dim ie As Object
    Set ie = GetIE                                        'get new/existing IE object
    ie.Navigate "http://mrexcel.com", 2             '2=don't keep history
    Do: DoEvents: Loop While ie.Busy or ie.ReadyState <> 4'wait til loaded
    Stop                                                  'do your stuff
    ie.Quit                                               'close IE
    Set ie = Nothing                                      'clean up
End Sub

lifted from the web, and unfortunatly I know noting about powerbi connections

 

[Pak Mariman]

lifted from the web, and unfortunatly I know noting about powerbi connections

Sorry, I would want to get it through a Power Query and not via VBA.

I am looking to drill down on the target URL and grab the data, but cannot do so because of the bl****y IE out-of-date error.

 

[Pak Mariman]

Bump

 

[Pak Mariman]

Bump

 

[Pak Mariman]

Bump