View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
rick rick is offline
external usenet poster
 
Posts: 32
Default 2007 - is it possible to set a hyperlink in a msgbox??

Thank you Dave. Your last example "..just follow the hyperlink" works great.
Rick

"Dave Peterson" wrote in message
...
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