This is it. Thanks pal!
Phone Link not showing Contact Names....again
Displays mix of number and contact names. Used to display Names only. It's free, so I guess I get what I pay for?
Windows for home | Windows 11 | Connect Phone and PC
Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.
122 answers
Sort by: Newest
-
Anonymous
2023-04-17T23:11:14+00:00 -
Anonymous
2023-04-11T12:58:02+00:00 This is for Outlook Windows application and VBA. You may connect Outlook application to the account in Outlook.com and then you have access to your contacts from it. There is a folder in Contacts ending with "(contacts synced by Link to Windows)" and in this directory you have those duplicated contacts. Run macro, select this folder with duplicates and wait.
-
Anonymous
2023-04-11T09:58:08+00:00 Thank you Zoono for your reply.
Before I kick this off, can you confirm this is to remove my duplicates in Outlook.com, or is it to repair/remove duplicates in my MS Phone Link??
The subject matter is "Question has a reply: Phone Link not showing Contact Names....again" and i have both these issues at the moment. Albeit the Phone Link issues seems to have improved. :)
Cheers,
Barry
-
Anonymous
2023-04-10T12:15:56+00:00 Workaround to remove duplicates using VBA in Outlook.
Sub DeleteDuplicateContactsInSelectedFolder() Dim i As Long Dim n As Long Dim Message As String Dim Items As Object Dim AppOL As Object Dim NS As Object Dim Folder As Object Set Items = CreateObject("Scripting.Dictionary") Set AppOL = CreateObject("Outlook.Application") Set NS = AppOL.GetNamespace("MAPI") Set Folder = NS.PickFolder 'Set Folder = NS.Folders("*** Email address is removed for privacy ***").Folders("Contacts").Folders("Galaxy S23 Ultra (contacts synced by Link to Windows)") If Folder.DefaultItemType <> 2 Then Exit Sub n = Folder.Items.Count Dim duplicates As Integer duplicates = 0 For i = n To 1 Step -1 On Error Resume Next Contact = Folder.Items(i).FirstName If Items.Exists(Contact) = True Then Folder.Items(i).Delete duplicates = duplicates + 1 Else Items.Add Contact, True End If Next i If duplicates > 0 Then MsgBox "Removed contacts number: " & duplicates, vbOKOnly End If ExitSub: Set Folder = Nothing Set NS = Nothing Set AppOL = Nothing End Sub -
Anonymous
2023-04-03T13:41:28+00:00 I have had many smart phones over the years connected to exchange and have managed to get several duplicates of a lot of my contacts. I have nearly 3000 contact records and most records had between 3 and 5 duplicates ON THE PHONE, and not in Outlook (Exchange Server). Since I transition away from a Windows phone to Android the problem was hidden by the Android mail client since it "Merged" the duplicates.
After making backups, I recently Unmerged everything and deleted all records stored on the phone or in Google mail. Now I only have my contacts from Outlook and all of my mysterious email contact issues disappeared! Yay!
This has been a continuous series of small issues over the years which now appear to be fully resolved.
As an added bonus, Phone Link now shows the correct names instead of numbers.