I have a Userform with a Textbox. I need to Split the Firstname Lastname into a Hyperlink.
Here is the code I have from another Textbox to Hyperlink:

Code:
    Option Explicit

        Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
        (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
        ByVal lpParameters As String, ByVal lpDirectory As String, _
        ByVal nShowCmd As Long) As Long

    Private Sub CommandButton1_Click()
    
        Dim lngOpenPage As Long
        lngOpenPage = ShellExecute
'This is from a past project
(Application.hwnd, "Open", "http://eic.mycompany.com/eic_drw/qr/" & TextBox1.Text, 0&, 0&, 0&) 'What are the 0& at the end of this?
        'lngOpenPage = ShellExecute
'This is the one I need to execute. I just need the Firstname Lastname split from Textbox1.
(Application.hwnd, "Open", "http://edirectory.mycompany.com/ldap/CorpDirServlet?snMatch=exact&givennameMatch=exact&action=FindEmployee&sn=Lastname&givenname=Firstname&MiddleInitial=&telephoneNumber=
    End Sub