Issue with where Outlook saves new contacts

Status
Not open for further replies.

tswatek

Member
Outlook version
Email Account
POP3
In Outlook 2016, I have multiple email accts: 2 that use MS Exchange (2 separate employers' emails), and several others using POP3 (1 Yahoo, 2 gmail, and 1 other).

I use iCloud for syncing contacts across my PC, laptop, iPhone, and iPad.

The problem I'm having is that all new contacts - created on any of my 4 devices - is saved to my Exchange acct rather than my iCloud contacts acct (see image).




For clarity, I like all my contacts stored in "Contacts - iCloud", but all new contacts saved on any of my 4 devices are all saved to one of my Exchange accts for my work email address. I don't know why - it's just where new contacts show up when they're saved.

My issue with that is that my employer monitors my Exchange acct and I don't want them seeing my contacts, many of which are not work-related. All my devices are my own and not company-issued or owned.

The work-around I've been trying to use is:

  1. Save the contact, which I know will be saved to the one Exchange contacts location.
  2. Manually move the new contact from the Exchange contacts location to the iCloud contacts location.
  3. Hit the Outlook iCloud refresh button that pushes out a sync.

It would be so much nicer if all new contacts - saved on any device - were automatically saved to the iCloud contacts location. Can I change to this? Is it a setting?
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
Outlook should save new contacts to the account you are viewing when you create it. You can use the move to folder command as you save the contact so you don't need to close it then find and move it.

Depending on your method to create new contacts, a macro that saves contacts to icloud might be helpful.

Not tested so i might have forgotten something... but this should work. Add it as a button to the ribbon and when you want to create a contact, click the button to get a new form.

(Just tested it - it works.)

Code:
Public Sub CreateContactiCloud()

Dim objContact As Outlook.ContactItem
Set contactFolder = GetFolderPath("icloud\contacts")
Set objContact = contactFolder.Items.Add(olcontactItem)
objContact.Display

End Sub

Function GetFolderPath(ByVal FolderPath As String) As Outlook.Folder
    Dim oFolder As Outlook.Folder
    Dim FoldersArray As Variant
    Dim i As Integer
       
    On Error GoTo GetFolderPath_Error
    If Left(FolderPath, 2) = "\\" Then
        FolderPath = Right(FolderPath, Len(FolderPath) - 2)
    End If
    'Convert folderpath to array
    FoldersArray = Split(FolderPath, "\")
    Set oFolder = Application.Session.Folders.item(FoldersArray(0))
    If Not oFolder Is Nothing Then
        For i = 1 To UBound(FoldersArray, 1)
            Dim SubFolders As Outlook.Folders
            Set SubFolders = oFolder.Folders
            Set oFolder = SubFolders.item(FoldersArray(i))
            If oFolder Is Nothing Then
                Set GetFolderPath = Nothing
            End If
        Next
    End If
    'Return the oFolder
    Set GetFolderPath = oFolder
    Exit Function
       
GetFolderPath_Error:
    Set GetFolderPath = Nothing
    Exit Function
End Function
 
Last edited:

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
BTW, i also have a macro at Save appointments to a non-default Outlook calendar folder that will watch the default contacts folder and move contacts that are dropped into it. This will only work for you if you never want to save contacts in the default mailbox. (That macro uses the same function as the macro i posted above - the macros can share it.)
 
Status
Not open for further replies.
Thread starter Similar threads Forum Replies Date
P Outlook 2013 "Item could not be moved - still an issue for Outlook 2013 Using Outlook 0
E Mail sorting view issue Using Outlook 1
D hide messege issue Using Outlook 1
B Outllok 2007 License Expired issue Using Outlook 0
ManaarZakaria I'm afraid of this issue, cause of strange error Exchange Server Administration 2
e_a_g_l_e_p_i Another reinstall of Outlook 2010 issue Using Outlook 10
Justo Horrillo Issue with rules in Outlook 2010 Using Outlook 4
G Icloud Contacts With Outlook Issue Using Outlook 4
J Outlook.com Contact Sync Issue Using Outlook.com accounts in Outlook 9
M Calendar Time Zone issue Using Outlook 0
B My outlook calendar edit issue Outlook VBA and Custom Forms 0
D Unusual calendar issue Exchange Server Administration 0
D Multiple Accounts Issue Receiving Emails in 2016 Using Outlook 0
B Winmail.dat Issue Using Outlook.com accounts in Outlook 0
K Outlook with MDaemon Connectivity Issue Using Outlook 4
G .ost file corrupted / solved the issue with some posts already said, but .ost file is corrupted agai Using Outlook 2
D Resizing issue for message field Outlook VBA and Custom Forms 0
P Outlook hanging issue Using Outlook 0
K Outlook 2013 calendar issue with Outlook.com Using Outlook.com accounts in Outlook 2
J Favorites in Public Folders issue Outlook VBA and Custom Forms 0
K Insert screenshots issue Using Outlook 2
T issue changing [Type] in dbo.ContactMainTable/ contacts seem to be deleted BCM (Business Contact Manager) 5
B Sub Calendar-Color Coding Issue Using Outlook 4
T Using Outlook 2007 with Comcast (.pst inbox issue) Using Outlook 1
Brendan.Z Outlook 2013 signature editing issue Using Outlook 3
F Custom contact form icon issue Using Outlook 1
A Autocomplete issue Using Outlook 6
wallisellener Synch issue BCM (Business Contact Manager) 2
H Outlook 2013 size issue Using Outlook 1
C Voting Issue with Shared Inbox Using Outlook 1
J Outlook 2013 Forms Issue Using Outlook 1
M BCM remote database connection issue BCM (Business Contact Manager) 1
A How are you handling Outlook.com category issue and syncing Using Outlook.com accounts in Outlook 2
J Outlook.com EAS Issue Using Outlook.com accounts in Outlook 6
santheocles Issue in Outlook 2013 - cannot reschedule single task Using Outlook 0
P Outlook ruler issue Using Outlook 3
K Different kind of issue related to creation of archive after one has been deleted Exchange Server Administration 1
JR Ryan Outlook marks all as "Read" issue Exchange Server Administration 2
SirFishAlot SIGNATURE EMBED ISSUE OUTLOOK 2013 BCM (Business Contact Manager) 10
J Please help to clarify an IMAP issue Using Outlook 7
S Passive Mailbox database Resynchronization issue Exchange Server Administration 1
J Outlook using colors issue Using Outlook 7
B Outlook 2013 & BCM Issue Using Outlook 2
E OL2013 Notes Form Issue - Menus Using Outlook 6
N Please help....winmail.dat issue...slowly going insane..... Using Outlook 1
L Outlook 2010 VBA issue Using Outlook 1
G Outlook Intermittent Issue with Drafts not Displaying Entire Content Using Outlook 4
B Signature Reply Issue Using Outlook 1
O Outlook 2013 using DAMO (connector for Domino) Sent Items Issue Using Outlook 2
T issue bcm crash when using mousewheel BCM (Business Contact Manager) 7
Similar threads


















































Top