I am successfully using the following: -


Private Sub lblFeedback_Click()
Link = ?subject=Subject"
On Error GoTo NoCanDo
ActiveWorkbook.FollowHyperlink Address:=Link, NewWindow:=True
Exit Sub
NoCanDo:
MsgBox "Cannot open " & Link
End Sub

Is it possible to hide the email address and put e.g. "ADMIN" with something
similar to the text to display used in the Outlook address book?