You're going to have to use a userform--
Or maybe you could add a button (ok/cancel???) and use cancel for the hyperlink
(you'll have to add that to the instructions (and the text won't look like a
hyperlink):
Option Explicit
Sub testme()
Dim resp As Long
resp = MsgBox(prompt:="This application requires Microsoft Excel 2007." _
& vbNewLine & vbNewLine & "Hit cancel to follow hyperlink", _
Buttons:=vbOKCancel)
If resp = vbCancel Then
ThisWorkbook.FollowHyperlink _
Address:="http://support.microsoft.com/kb/924074"
End If
End Sub
(or maybe you can just always follow the hyperlink????)
Option Explicit
Sub testme()
MsgBox prompt:="This application requires Microsoft Excel 2007.", _
Buttons:=vbOKOnly
ThisWorkbook.FollowHyperlink _
Address:="http://support.microsoft.com/kb/924074"
End Sub
rick wrote:
>
> With the following MsgBox:
> Call MsgBox("This application requires Microsoft Excel 2007. " _
> & vbCrLf & "" _
> & vbCrLf & "You must install the Microsoft Office
> Compatibility Pack " _
> & "in order to use 2007 Microsoft Office documents in
> Office XP, Office 2003, and Office 2000. Click on the following link to
> visit the Microsoft website that explains the requirements and procedure to
> install the compatibility pack." _
> & vbCrLf & "" _
> & vbCrLf & "http://support.microsoft.com/kb/924074" _
> & vbCrLf & "" _
> & vbCrLf & "This application will now shut down." _
> , vbCritical Or vbSystemModal, "Incompatible Version of
> Excel")
>
> Is it possible or must I use a Userform?
>
> Thanks.
>
> Rick
--
Dave Peterson
|