Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
How to tell if Excel is in Browser or Application
I have a website with a hyperlink to an Excel spreadsheet. Some computers
are setup so that Excel opens in a browser, others open in the Excel application. I need to know if Excel is in a browser or not - since most of my macros don't work in a browser. Is there code to know if this? It has to work with Excel 97 through 2003. I'm thinking if there is something that errors out when in a browser, I could catch that error and know that way. Any insight is appreciated. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
How to tell if Excel is in Browser or Application
This is a routine posted by Ture Magnusson that may may give you some ideas:
Sub CheckIfInInternetExplorer() Dim x As Object 'Try to get container object On Error Resume Next Set x = ActiveWorkbook.Container On Error GoTo 0 'Show result depending on container's typename Select Case TypeName(x) Case "Nothing" MsgBox "The workbook is opened in Excel" Case "IWebBrowser2" MsgBox "The workbook is opened in Internet Explorer" Case Else MsgBox "The workbook is opened in another application: " & TypeName(x) End Select End Sub -- Jim Rech Excel MVP "Ken Valenti" <Ken wrote in message ... |I have a website with a hyperlink to an Excel spreadsheet. Some computers | are setup so that Excel opens in a browser, others open in the Excel | application. I need to know if Excel is in a browser or not - since most of | my macros don't work in a browser. | | Is there code to know if this? It has to work with Excel 97 through 2003. | I'm thinking if there is something that errors out when in a browser, I could | catch that error and know that way. | | Any insight is appreciated. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
How to tell if Excel is in Browser or Application
This would be perfect, but I can't get it to work in 97 or 2003.
If I take out on error resume next, it always errors out. Either in a browser or application. Is there a reference I am missing?' "Jim Rech" wrote: This is a routine posted by Ture Magnusson that may may give you some ideas: Sub CheckIfInInternetExplorer() Dim x As Object 'Try to get container object On Error Resume Next Set x = ActiveWorkbook.Container On Error GoTo 0 'Show result depending on container's typename Select Case TypeName(x) Case "Nothing" MsgBox "The workbook is opened in Excel" Case "IWebBrowser2" MsgBox "The workbook is opened in Internet Explorer" Case Else MsgBox "The workbook is opened in another application: " & TypeName(x) End Select End Sub -- Jim Rech Excel MVP "Ken Valenti" <Ken wrote in message ... |I have a website with a hyperlink to an Excel spreadsheet. Some computers | are setup so that Excel opens in a browser, others open in the Excel | application. I need to know if Excel is in a browser or not - since most of | my macros don't work in a browser. | | Is there code to know if this? It has to work with Excel 97 through 2003. | I'm thinking if there is something that errors out when in a browser, I could | catch that error and know that way. | | Any insight is appreciated. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel in web browser | Excel Programming | |||
macro to close excel application other than application.quit | Excel Programming | |||
Application coding in Web Browser | Excel Programming | |||
Excel and web browser | Excel Programming | |||
application.screenupdating problems and IE browser window | Excel Programming |