Is there a way to add the SAME information to the SAME field in a group of contact en

[jp91306]

I have a LARGE group of contacts (already in a separate contact set) that needs a change made to just ONE field of each contact. The SAME info will go into the SAME field of each. (Basically, the COMPANY field has changed for every one of them!)



Is there a way to do this as a "batch" process, and not have to edit every single entry separately.

Thanks,

jp

[niton]

http://msdn.microsoft.com/en-us/libr...ctEditingMacro

Sub CompanyChange_All()
    Dim ContactsFolder As Folder
    Set ContactsFolder = Session.GetDefaultFolder(olFolderContacts)
    MsgBox ("Contacts Found:" & ContactsFolder.Items.Count)
    
    Dim Contact As ContactItem

    For Each Contact In ContactsFolder.Items
        If Contact.CompanyName = "Example Systems" Then      
            Contact.CompanyName = "Example Networks"
            Contact.Save
            Debug.Print "Changed: " & Contact.FullName
        End If
    Next
End Sub

******
If not in the default folder, "already in a separate contact set", try this UNTESTED code on a selection of test items.

Sub CompanyChange_Selection()
     
    Dim Contact As Object

    For Each Contact In ActiveExplorer.Selection

	If Contact.Class = olContact Then
	    If Contact.CompanyName = "Example Systems" Then
            	Contact.CompanyName = "Example Networks"
            	Contact.Save
            	Debug.Print "Changed: " & Contact.FullName
            End If
        End If
    Next
End Sub

If you are unfamiliar with VBA see here http://www.slipstick.com/developer/h...ks-vba-editor/

You will find information about:
- macro security settings
- where to put the code
- how to create a button


*******************
Consider rating the thread by going to the "Rate Thread" dropdown.

[niton]

See here "Update general info for multiple contacts" http://www.howto-outlook.com/howto/m...ontactinfo.htm





******************
Consider rating the thread by going to the "Rate Thread" dropdown.