Solved: Preventing Excel from opening in IE

[tomsweddy]

Hi,

Is there anyway to build something into the Open command of an Excel workbook to force it to open in Excel rather than in Internet Explorer? (as my workbook is downloaded off the net)

I have seen solutions like this> http://www.computerhope.com/issues/ch000462.htm but they require you to change your settings on your computer rather than the workbook itself. I have over 300 users and this would take forever this way!!!

Thanks

[Oorang]

Hi Tom,
May I ask why this is needed? How a file opens is a user setting. Overriding user settings is considered is generally considered "poor behavior". Are you sure this is the best approach?

[tomsweddy]

Basically I need to make this change because, when my workbook is opened in IE lots of the VB code doesnt behave as it does when functioning in the proper Excel applicaiton.....

[Oorang]

What code is not behaving as it should?

[tomsweddy]

print previews, printing, saving........etc

all code that I have written works fine in excel, but buggers up in IE

[Oorang]

You could just give them a button in the workbook that reopens the file in Excel:
[vba]Public Sub LaunchInExcel()
Dim strPath As String
Dim xlApp As Excel.Application
strPath = Environ$("TEMP") & "\" & GetGUID & ".xls"
ThisWorkbook.SaveCopyAs strPath
Set xlApp = New Excel.Application
xlApp.Workbooks.Open strPath
xlApp.Visible = True
End Sub

Private Function GetGUID() As String
GetGUID = Mid$(CreateObject("Scriptlet.TypeLib").GUID, 2&, 36&)
End Function
[/vba]

[tomsweddy]

Great Thanks

[tomsweddy]

Why do u need this bit?

[VBA]Private Function GetGUID() As String
GetGUID = Mid$(CreateObject("Scriptlet.TypeLib").GUID, 2&, 36&)
End Function [/VBA]

[Oorang]

Just a way to get a temporary file name that I know won't already be in use