Refresh a local web page via Excel
The error tells you that the public variable (Browser) must have been
destroyed by some of your code (or maybe even it resides in a
different VBA project alltogether.
Without seeing the resto of the code it's hard to tell which bit of
your code actually destroys the variable.
On Feb 25, 10:54*am, "Pete" wrote:
Hi again
A couple of weeks ago I asked if there was a command to refresh a web page
on a local drive
As I gave very little detail I don't think that anybody understood my
request :(
I will now try to clarify
Using Excel 2002 on Vista
Purpose:
The program puts certain details on a sheet which is published as a local
web page and, using Extended Desk-top, is projected onto a large screen
The detail on the sheet is frequently updated and the wish is for the
projected page to update (refresh) automatically. *Currently the user has to
go to the page and press F5
I will describe the full set of relevant code
'I have a function to launch a web page using IE:
Public Browser As Object
Function OpenBrowser(tmpURL)
Set Browser = CreateObject("InternetExplorer.Application")
* * Browser.Navigate (tmpURL)
* * Browser.Addressbar = False
* * Browser.StatusBar = False
* * Browser.Toolbar = False
* * Browser.MenuBar = False
* * Browser.Visible = True
* * Browser.Resizable = True
End Function
'I then start the program opening IE with the specified web page :
Dim WebPageDirectory As String
WebPageDirectory = Range("My_Directory") & "\page.htm"
'Using the function called OpenBrowser
OpenBrowser WebPageDirectory
'In another routine on a form these lines redraw the page
MyAdd = Range(Cells(1, 1), Cells(NumberTablesRows + 1, NumberTablesColumns +
1)).Address
With ActiveWorkbook.PublishObjects.Add(SourceType:=xlSo urceRange,
Filename:=Range("My_Directory") & "\page.htm", Sheet:="Venue",
Source:=MyAdd, HtmlType:=xlHtmlStatic)
* * *.Publish (True)
* * *.AutoRepublish = True
End With
Up to here it all works well
At this point I need Excel to refresh the Page.htm with a command using
something like (one of) the following :
With Browser
* * .Republish
* * .Publish
* * .Refresh
End With
Unfortunately all of the above commands give me error 91 - "Object variable
or With Block variable not set"
I wondered whether there is a command that will refresh (F5) the web page?
Thanks in advance
--
Regards,
Peter Bircher
Cell : * *083 233 1628
Email:
|