How to pause a macro when dialog box is open

Take a look at the Contact List add-in that you can download from the following page of my OneDrive:

http://bit.ly/1hduSCB

You can call the Outlook address book directly from your procedure e.g.

Public Function SelectAddress() As String
Dim strCode As String
Dim strAddress As String

    'Set up the formatting codes in strCode
    strCode = "{<PR_DISPLAY_NAME_PREFIX> }<PR_GIVEN_NAME> <PR_SURNAME>" & vbCr
    strCode = strCode & "{<PR_TITLE>" & vbCr & "}"
    strCode = strCode & "<PR_COMPANY_NAME>" & vbCr
    strCode = strCode & "<PR_POSTAL_ADDRESS>"

    'Let the user choose the name in Outlook
    strAddress = Application.GetAddress("", _
                                        strCode, False, 1, , , True, True)
    If strAddress = "" Then
        MsgBox "User cancelled or no address listed", , "Cancel"
    End If
    SelectAddress = strAddress
End Function

SelectAddress is the selected address e.g.

Sub Test()
MsgBox SelectAddress
End Sub

You can call the Outlook address book directly from your procedure e.g.

Public Function SelectAddress() As String
Dim strCode As String
Dim strAddress As String

    'Set up the formatting codes in strCode
    strCode = "{<PR_DISPLAY_NAME_PREFIX> }<PR_GIVEN_NAME> <PR_SURNAME>" & vbCr
    strCode = strCode & "{<PR_TITLE>" & vbCr & "}"
    strCode = strCode & "<PR_COMPANY_NAME>" & vbCr
    strCode = strCode & "<PR_POSTAL_ADDRESS>"

    'Let the user choose the name in Outlook
    strAddress = Application.GetAddress("", _
                                        strCode, False, 1, , , True, True)
    If strAddress = "" Then
        MsgBox "User cancelled or no address listed", , "Cancel"
    End If
    SelectAddress = strAddress
End Function

SelectAddress is the selected address e.g.

Sub Test()
MsgBox SelectAddress
End Sub

Unfortunately, I don't do programming - this is all Latin to me!  Do I just cut and paste, and if so, where?

Take a look at the Contact List add-in that you can download from the following page of my OneDrive:

http://bit.ly/1hduSCB

I get a Run time error 438: "Object doesn't support this property or method"

This is a Word function. http://www.gmayor.com/installing_macro.htm   

You said you wanted to create a macro - I assumed that you might know how to do that.

The function gets the name and address from the Outlook address book. How you use that would depend on what exactly you are trying to do with the form. You simply call the function from your macro as in the Test macro which simply displays the selected address in a message box. To type it at the cursor change the line MsgBox SelectAddress to

Selection.Text = SelectAddress

Tell us more about the 'form' and I will be more specific.