Recent content by bnj1776

My attempts to sort by EntryID creates: Run-time error '-2147467259 (80004005)' The operation failed. I've looked at the MSDN Items.Sort Method page many times. EntryID is not on the list of Cannot Be Used specifically, so it must fall under "Category" or "Class"??? With 4000+ contacts it...

Error trapping added for this, but not finding any way to easily resume to the middle of for next loop of all contact items. Not able to sort by EntryID??? Am I missing something here??? Otherwise if initially the Contact Items were sorted by LastModificationTime, restricting the continued...

Added test to prevent copy from even starting if Outlook open, but with thousands of contacts the user can still open & close Outlook causing the problem while the copy is running.

I've used "Set objOutlook = New Outlook.Application" in my Excel VBA, but while I'm copying Contacts to an array and the user closes Outlook, Excel dies with Run-time error '462': The remote server machine does not exist or is unavailable. Is there any way to prevent this error within the...

Just tried to add a folder manually from within Outlook again ... The test account I set up is an "Exchange ActiveSync" version. Tried to create a new account and did not get option to change it for outlook.com address. There is an option to create a "mobile directory" for the contacts...

Just tried to create a new contacts folder in Outlook manually... When I set up Outlook I just took the defaults... just tried setting up the account again an no option to change. *head desk*

Right. Here is an example of how: http://www.jpsoftwaretech.com/look-for-and-create-folders-programmatically-in-outlook/ that I followed. Dim objContacts1 As Outlook.MAPIFolder Set objContacts1 = objNamespace.GetDefaultFolder(olFolderContacts) ' Set objContacts1 =...

Again I'm not finding any way to create a "new" folder (without Exchange?). Here is what I can get close with, but not finding anything that will fix the objContacts2 errors: Option Explicit Sub Contact_User1() Dim idx As Integer Dim objOutlook As Outlook.Application 'Object...

Yep, that fails too because of type mismatch; not an addresslist object required by InitialAddressList.

It looks as though all the options to create a temp addresslist are tied to Exchange which we are not using. such as.. http://msdn.microsoft.com/en-us/library/office/ff344715(v=exchg.150).aspx

Not finding any way to create that temporary address list either. I can add to an exiting list, but not create a new one.

Nope, that does not work either. added this to With objDialog For Each objItem In objItems .recipients.Add (objItem.Email1Address) Next I get back the one name I clicked on and the four names added above even though there is a limit of one. Unless I can somehow create a temporary...

Thanks for the help, but after 7 hours of searches and attempts I just don't see how "Items.Restrict" can work with the Outlook.AddressList. The addresslist is read only and I am not seeing anyway to simply create a temp address book to pull an address list from either. With the working...

Thank you Diane. This part of the project is done. Here is a copy of the Registry save code I'm using in Execl ... Private Sub fmContactType_RegistrySave() ' Save Contact Type information to the Registry for use in Outlook ' Previously declared ' Public Const sRegistry As...

Follow question here on the Excel site: Outlook GetSelectNamesDialog questions