If you enter a Home address for most people, but not a Business address, you may want the Home address to appear by default when you open a new Contact item. This is very simple to accomplish with a custom Contact form in all newer Outlook versions.

Use this method to change which four phone fields are shown by default

Outlook 2007, 2010 and 2013

While the basic steps are the same for all versions of Outlook, the menus are different in Outlook 2007 and up.

If using Outlook 2007 and up, you need to show the Developer Ribbon to see the Publish options. From Outlook 2007's Office orb (formerly File menu) click the Editor options button. add a check to 'Show developer tab' is in the Popular tab section and return to Outlook. Select the Developer tab on the ribbon and publish the form.

In Outlook 2010 and up, go to File tab, Options, Customize Ribbon and enable the developer tab (on the right side of the dialog.) Return to Outlook and use the Publish command on the now-visible Developer ribbon.

To Create a custom Contact form:

1. Switch to the Contacts folder.
2. Open a new contact.
3. Switch the address selector from Business to Home.
4. Add a check to the box to use it as the default mailing address.
5. Choose Developer | Publish | Publish Form As .
6. The Publish Form As dialog should show the form as being published in Outlook Folders, under Contacts.
   

   If it doesn't show the Contacts folder as the publication location, you'll need to use the Look In drop-down list and Browse button to get to the Contacts folder.

7. Enter a name for your form, then click Publish
8. Set the Display name to Home.
9. Click Publish.

Under the New Items button menu in the Contacts folder, the new form will be listed on the Custom Forms menu. Click this to bring up a new Contact item, showing the Home address box.

If you want to use this as the default for all new contacts, see To apply a new form to a folder.

How to set the Home address as default

This video was recorded in Outlook 2010, but the steps are similar in all versions, only some menus have changed.

Outlook 2003 and older

To Create a custom Contact form:

1. Switch to the Contacts folder.
2. Open a new contact.
3. Switch the address selector from Business to Home.
4. Add a check to the box to use it as the default mailing address (required for Outlook 2002 and above).
5. Choose Tools | Forms | Publish Form.
6. The Publish Form As dialog should show the form as being published in Outlook Folders, under Contacts. That's what you want to do. If it doesn't show the Contacts folder as the publication location, you'll need to use the Look In drop-down list and Browse button to get to the Contacts folder.
7. Set the Display name and Form name to Home.
8. Click Publish.

Under the Actions menu in the Contacts folder, you should now see a new entry at the bottom -- New Home. Click this to bring up a new Contact item, showing the Home address box.

Using the Custom Form

If you don't want to create your own form, download a sample form. You'll need to open the .oft file and publish it.

To make your new form the default for your Contacts folder, see To apply a new form to a folder.

To convert existing contacts to use the new form, use DocMessageClass or a VBA macro.

Change the mailing address on selected contacts using VBA

You can use a VBA macro to change the address that is used for the mailing address. Select the contact(s) that need changed and then run the code.

Note: this code is my super-duper bulk contacts changer code. You can use the code to change any contact field by replacing the fields between With objContact and End With.

Public Sub ChangeMailingAddress()
' fromhttp://slipstick.me/dk

    Dim Session As Outlook.NameSpace
    Dim currentExplorer As Explorer
    Dim Selection As Selection
    Dim currentItem As Object
    Dim folder As Outlook.folder
    
    Dim obj As Object
    Dim strFirstName As String
    Dim strLastName As String
    Dim strFileAs As String

    Set currentExplorer = Application.ActiveExplorer
    Set Selection = currentExplorer.Selection

    On Error Resume Next

    For Each obj In Selection
    Set folder = currentItem.Parent
        'Test for contact and not distribution list
        If obj.Class = olContact Then
            Set objContact = obj

            With objContact
            'valid choices are olBusiness, olHome, or olOther
                .SelectedMailingAddress = olBusiness
                .Save
            End With
        End If

        Err.Clear
    Next

    Set Session = Nothing
    Set currentExplorer = Nothing
    Set obj = Nothing
    Set Selection = Nothing
    Set currentItem = Nothing
    Set folder = Nothing
End Sub