Reverting to default outlook contact form

Status
Not open for further replies.

nmokri

Member
Outlook version
Outlook 2010 32 bit
Email Account
POP3
I created a custom contact form which I no longer wish to use. I want to go back to the standard outlook 2010 contact form. However, I can not find the custom form ai created to delete it and I need to know what will happen to the contacts I have created using the custom form? I would appreciate any advice.
 
if the form is missing, they will use the default but complain they can't find it first. See change message class for a utility or a macro to change the message class to ipm.contact after you change everything back to ipm.contact you can remove the form.
 
Diane,

Thanks for the prompt response. Unfortunately the link to DocMessageClass does not work and I have no idea how to write code for micros. I did find the following posted micro which I suppose can be used to revert to standard form, but still not sure what changes to make to this macro to do what I need it to do. I figured that the values in quotations are the ones needed to be changed, but after user name I am lost. the form I created is "IPM.Contact.Custom Contact Form". More help please.

[h=2]Re: How to Set Existing Contacts to Custom Form[/h]
Okay. Here is the code to fix the problem. Create a macro in Outlook (under the Developer tab). Please the following code. Run the code once. It resets all existing contacts in the selected folder to the custom form.

Sub ChangeMessageClass()

UName = Environ("UserName")

Set olNS = Application.GetNamespace("MAPI")

Set ContactsFolder = olNS.Folders("Public Folders - " + UName + "@goodnewsjail.org")

Set ContactsFolder = ContactsFolder.Folders("All Public Folders")

Set ContactsFolder = ContactsFolder.Folders("Good News Contacts")

'Set ContactsFolder = _

olNS.GetDefaultFolder(olFolderContacts)

Set ContactItems = ContactsFolder.Items

For Each Itm In ContactItems

If Itm.MessageClass = "IPM.Contact" Then

Itm.MessageClass = "IPM.Contact.Good News Contact"

Itm.Save

End If

Next

End Sub​

 
it looks like they changed their website from php to html - Docmesssageclass url is http://www.publicshareware.com/public-share-outlook-utilities.html

Why not use the first macro on the page? ChangeContactMessageClass. You just need to change this line:

NewMC = "IPM.Contact"

Open the contacts folder before running the macro (it runs on the current folder).
 
Larry,

Thanks. It worked. The contacts are back to standard display. However, when view is set to LIST, the icon for the contacts with custom display did not change and still shows a sticky note with a blue pin. Not that it matters a whole lot, but is there a way to change that.

I have tried deleting the Custom display form but that option is not available either. Any suggestions?
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
T Outlook 365 Search Box reverting to old location Using Outlook 2
M Reverting The Outlook Search Box Location (or other undesired additions) Using Outlook 1
S stop calendar date reverting to today Using Outlook 7
J Issues in Canceling iCloud Configuration and Reverting to Local PST Configuration Using Outlook 0
Hudas Outlook VBA script reverting back to previous changes Outlook VBA and Custom Forms 2
W Calendar Note Font Reverting Using Outlook 11
J Set calendar default to 'none' (policy) Exchange Server Administration 3
J Calendar events created on iPhone automatically changing default alert from 'None' to 'Time of Event' Using Outlook.com accounts in Outlook 0
P turn off the default "all day" check box in new calendar items. How? Using Outlook 1
A Outlook 365 New Appointments All saved to a 365 default calendar on Mac Using Outlook 0
D Outlook 2021 Using vba code to delete all my spamfolders not only the default one. Outlook VBA and Custom Forms 0
B Outlook 2019 Custom Email form - Edit default email form Outlook VBA and Custom Forms 6
W Outlook 365 I am getting the "Either there is no default mail client" error when I try to send an email on excel Office 365 Using Outlook 1
P Outlook 2016 Change Paste Special Default Format Using Outlook 8
Geldner Tweak Junk Email Reporting tool to default to particular email on send? Using Outlook 3
P default font when sending email from browser Using Outlook 1
nmanikrishnan Auto-reply from default account Using Outlook 1
E Default shape via VBA Outlook VBA and Custom Forms 4
A force outlook to default to MY calendar Using Outlook 3
F VBA to move email from Non Default folder to Sub folders as per details given in excel file Outlook VBA and Custom Forms 11
e_a_g_l_e_p_i Outlook 2010 How to set default email address for website links Using Outlook 3
V Accepted meetings do not get the default reminder Using Outlook 0
Fozzie Bear Accepted Zoom Invites deleting without going into Default Calendar - Office 2016 Mac Using Outlook 3
W September 2020 - No Default Email Client message after Office Update Using Outlook 1
G Add to Outlook Contacts - Point to non-default contacts folder Using Outlook 0
R How to get the Items object of the default mailbox of a specific account in a multiple account Outlook? Outlook VBA and Custom Forms 0
R Auto display of new email does not work on non-default account Outlook VBA and Custom Forms 0
E How to display "Change Folder" in Change Default Email Delivery Location in Exchange Outlook 2016 Using Outlook 1
F Default font for notes in contacts Using Outlook 1
S Outlook 2010 unable to change default font Using Outlook 7
O How come default profile changed? Using Outlook 2
N How to set automatically the default or user defined Quickstyle Templates by Answer in Outlook Using Outlook 1
W Message class changes of a custom form changes to the default form Using Outlook 2
T Outlook changes default account Using Outlook 1
P how to remove unwanted PST file default categories assigned to many calendar entries Using Outlook 7
P Reading Pane (Reading Pain?) Default Setting Using Outlook 1
A Add to Outlook Contacts from email - default view Outlook VBA and Custom Forms 1
P Making iCloud the default calendar for Outlook 2016 Using Outlook 3
M Outlook 2016: Changing default font for Notes and Reading Pane Using Outlook 4
V Change default default save location to Quick Access Using Outlook 1
V Changing default date for task follow-up buttons Using Outlook 2
C Change default "Save Sent Item To" folder Outlook VBA and Custom Forms 9
V VBA when replying + Default Account Using Outlook 2
P Outlook.com account overrules default account Using Outlook.com accounts in Outlook 8
P Outlook 2016 Not Default Client Using Outlook 5
D Add all meeting rooms to the meeting request by default Outlook VBA and Custom Forms 0
Mark White VBScript Move sent mail to non-default folder Outlook VBA and Custom Forms 5
Mark White VBScript Move sent mail to non-default folder Outlook VBA and Custom Forms 0
N How to delete default folder "Contacts" (olFolderContacts) in a .pst file Using Outlook 8
D Default Send Account that Works? Using Outlook 0

Similar threads

Back
Top