Version confusion

G

Guest

Hi, my problem it's taht I have some old completed froms. they were build
with one of my first version of form. Now, I have a new form and I want my
old forms with my new form template. But I'm not abble to do it!
I've found the code that will help me to do it but I just don't know where
to put it :\
Sub changeMessageClass()
Set olApp = New Outlook.Application
Set OlNs = olApp.GetNameSpace("MAPI")
Set TasksFolder = olNs.GetDefaultFolder(olFolderTasks)
Set TasksItems = TasksFolder.Items
For Each Itm in TasksItems
If Itm.MessageClass <> "IPM.Task.MyForm" Then
Itm.MessageClass = "IPM.Task.MyForm"
Itm.Save
End If
Next
End Sub
Is it ok?
Thanks,
 
G

Guest

Your logic is good, I'd only change a few things to clean it up:

Sub changeMessageClass()
Dim objNS As Outlook.NameSpace
Dim objTasksFolder As Outlook.MAPIFolder
Dim objTaskItems As Outlook.Items
Dim objItem As Object

Set objNS = Application.GetNamespace("MAPI")
Set objTasksFolder = objNS.GetDefaultFolder(olFolderTasks)
Set objTaskItems = objTasksFolder.Items
For Each objItem In objTaskItems
If objItem.MessageClass <> "IPM.Task.MyForm" Then
objItem.MessageClass = "IPM.Task.MyForm"
objItem.Save
End If
Set objItem = Nothing
Next

Set objNS = Nothing
Set objTasksFolder = Nothing
Set objTaskItems = Nothing
End Sub

Basically, just put the macro in your ThisOutlookSession module, then run it
from the VBA Editor or from the Macros dialog.
 
G

Guest

Ok, I put it on a macro and i do macro execute then changemessageclass, but
Nothing happen.
I have some old forms that were been made with version 1.1 and now my
default form in my task folder is version 2.8 so my old forms doesn't appears
on my new form template!
 
G

Guest

Yes, mycode execute because he write on the top of the microsoft visual basic
(execution) and it disapear. But Now I try to reexecute my macro and He said
that my macro is desactivate. I Have my version 2.8 by default into my task
folder
 
G

Guest

I set the macro security to medium but It always sayaing that my macros is
desactivate can you tell me how to reactivate it.
You should also add the Message Class column to a View in your Task folder
to see what form classes are attributed to your items.
How can I do this!
 
G

Guest

Do you maybe mean that the VBA Add-In has been disabled? Click the Disabled
Items button under Help -> About and enable it if it is there.

To add the Message Class column, right-click any column header in the Tasks
folder and select "Field Chooser". Then select "All Task fields" from the
drop down and drag the Message Class button into the view.

--
Eric Legault (Outlook MVP, MCDBA, old school WOSA MCSD, B.A.)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/
 
G

Guest

Click the Disabled
Items button under Help -> About and enable it if it is there.
Nothing there to reactivate . When I try to run my macro an error message
occured and say Macro in this project is desactivate.
To add the Message Class column, right-click any column header in the Tasks
folder and select "Field Chooser". Then select "All Task fields" from the
drop down and drag the Message Class button into the view.
This is ok! thanks
but not my macro:\
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top