Программно прокрутите UIScrollView к вершине дочернего UIView (подпредставления) в Swift

Прямой ответ - НЕТ. MsgBox не разрешает гиперссылки, просто текст.

Таким образом, это обходной путь, который должен работать нормально.

Set objShell = CreateObject("Wscript.Shell")

intMessage = MsgBox("Sorry, but you have an out-of-date database version.  Please redownload via the batch file to ensure that you have the latest version. Contact the administrator of this database or your manager if you need help." & vbCr _
        & vbCr _
        & "Your current database version is " & CurrentVer & " which may be out of date. The current database version prescribed on the network share is " & FileVer & ". They must match in order for you to proceed." & vbCr _
        & vbCr _
        & "Would you like to learn more about CSC self-help instructions on how to reload the most current version of the PRF Intake Tool to your computer?", _
        vbYesNo, "There is a problem...")

If intMessage = vbYes Then
    objShell.Run ("http://www.OurSite.com/online/Solutions/Search_Results.asp?opsystem=7&keywords=PRF+Intake+Tool&Category=")
Else
    Wscript.Quit
End If

Если стиль подчеркивания является требованием, тогда вы должны просто создать вашей собственной пользовательской формы, как описано в http://j-walk.com/ss/excel/tips/tip71.htm . Вот шаги:

1. Добавьте объект Label и введите свое сообщение
2. Сделайте ярлык синим (ForeColor) и подчеркнутым (Font), чтобы он (g7) 99 - fmMousePointerCustom
3. Задайте файл курсора для изображения MouseIcon метки [ если у вас есть).
4. Дважды щелкните ярлык и создайте подпрограмму Нажмите событие. Вот пример кода:

   Private Sub Label1_Click()
     Link = "http://www.YOUR_SITE.com"
     On Error GoTo NoCanDo
     ActiveWorkbook.FollowHyperlink Address:=Link, NewWindow:=True
     Unload Me
     Exit Sub
    NoCanDo:
     MsgBox "Cannot open " & Link End Sub
   

Чтобы создать гиперссылку «mail to», используйте инструкцию типа:

Link = "mailto:someone@somewhere.com"