Integrating with outlook

[fruitchunk]

I want to send tasks from Project to my Outlook
Is there any way to integrate with outlook if I doesn't have project server?

 

[JulieS]

Hello fruitchunk,

Project does not have this capability built in, however, if you try a
google group search you'll most likely get quite a few hints, some
including the code.

You may also like to see the information on "email notify" at the
project mvp site:

http://project.mvps.org/email_notify.htm

I hope this helps. Let us know how you get along.

Julie
Project MVP

Visit http://project.mvps.org/ for the FAQs and additional information
about Microsoft Project

 

[fruitchunk]

I read something about a macro to put my project tasks into Outlook, how do i
do it?

 

[JulieS]

Maurice Birchler posted some cost back in 2005. Below is a tinyurl to
the post from google. Note: I have not personally tried the macro so I
cannot comment to its effectiveness.

http://tinyurl.com/3dpx2v

I hope this helps. Let us know how you get along.

Julie
Project MVP

Visit http://project.mvps.org/ for the FAQs and additional information
about Microsoft Project

 

[fruitchunk]

I tried the following VBA code it works fine. Is there away I can export only
selected tasks not all of them?

http://www.outlookcode.com/codedetail.aspx?id=1165

Sub OutlookLink()
Dim appOL As Outlook.Application
Dim mspTask As MSProject.Task
Dim olTask As Outlook.TaskItem
Dim i As Integer
On Error GoTo objerror
Set appOL = GetObject(, "Outlook.Application") ' if Outlook is running,
this line will work
resumeplace:
For Each mspTask In MSProject.ActiveProject.Tasks
If Not (mspTask Is Nothing) Then
Set olTask = appOL.CreateItem(olTaskItem)
'note that you can capture other Project fields into Outlook fields
olTask.Subject = mspTask.Name
olTask.Body = mspTask.Name
olTask.DueDate = mspTask.EarlyFinish
olTask.StartDate = mspTask.EarlyStart
olTask.Role = mspTask.ID
olTask.PercentComplete = mspTask.PercentComplete
olTask.Save
Set olTask = Nothing
End If
i = i + 1
Next
MsgBox "Cheryl, " & i & " tasks were exported to Outlook!"
Exit Sub
objerror: ' if Outlook is not running, this will work
Err.Clear
Set appOL = CreateObject("Outlook.Application")
GoTo resumeplace
End Sub

 

[JulieS]

Fruitchunk,

I'm not a strong VBA person so please post your further question about
editing the VBA code to the Project Developer newsgroup. Please include
the code from the macro in you post.

I hope this helps. Let us know how you get along.

Julie
Project MVP

Visit http://project.mvps.org/ for the FAQs and additional information
about Microsoft Project