Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 11-20-2012, 12:56 PM
jp91306 jp91306 is offline Is there a way to add the SAME information to the SAME field in a group of contact en Windows 7 64bit Is there a way to add the SAME information to the SAME field in a group of contact en Office 2007
Novice
Is there a way to add the SAME information to the SAME field in a group of contact en
 
Join Date: Nov 2012
Posts: 16
jp91306 is on a distinguished road
Question Is there a way to add the SAME information to the SAME field in a group of contact en

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
Reply With Quote
  #2  
Old 03-02-2013, 05:35 AM
niton niton is offline Is there a way to add the SAME information to the SAME field in a group of contact en Windows 7 64bit Is there a way to add the SAME information to the SAME field in a group of contact en Office 2010 64bit
Competent Performer
 
Join Date: Jul 2012
Posts: 102
niton is on a distinguished road
Default VBA Solution

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

Code:
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.

Code:
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.
Reply With Quote
  #3  
Old 03-14-2013, 05:33 PM
niton niton is offline Is there a way to add the SAME information to the SAME field in a group of contact en Windows 7 64bit Is there a way to add the SAME information to the SAME field in a group of contact en Office 2010 64bit
Competent Performer
 
Join Date: Jul 2012
Posts: 102
niton is on a distinguished road
Default Non-VBA Solution

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.
Reply With Quote
Reply

Thread Tools
Display Modes


Similar Threads
Thread Thread Starter Forum Replies Last Post
deleted members of contact group reappear gtrdave Outlook 1 10-14-2014 10:10 AM
Delete contact group, still populates when typing to: MarleneHarkcom Outlook 0 04-04-2012 10:24 AM
Saving senders email to contact group RicWCO Outlook 0 03-26-2012 10:03 PM
creating a new field for contact form JoeR11 Outlook 1 12-20-2011 09:39 PM
Associate a contact with a group from within the contact page? SeattleALE Outlook 1 05-09-2011 04:00 AM

Other Forums: Access Forums - Senior Forums

All times are GMT -7. The time now is 02:18 AM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2020, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2020 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft