to write a macro in VB to pring weekly schedules of employees.  The task

schedules can be accessed by View->Reports>Assignments->To-Do-List, and
after that a window comes up to select the name of the employee, once I
choose the name, it shows me their task sheet (custom made) for next one

month.  I found that there is a method ReportPrintPreview, but that only

supports the reports that project makes.
When I started writing my code, I could access some of the fields like
following

p = TName =
ActiveProject.Resources.Item(6).Assignments.Item(1).ResourceName

in this case, p is the name of some employee, but I need to access some
other parameters that I don't see as methods or properties of Item. For
example I can see the number of hours assigned in the "Work" column
under "Resource Usage" view, but how do I access those hours through my
code, any code or help will be really appreciated. By the way I have
never done any VB, and never used project before.

Thanks
Ray

Rehan

<<I can see the number of hours assigned in the "Work" column under "Resource Usage" view, but how do I access those hours through my code>>

Sub ListAssignmentWork()
    Dim Tsk As Task, Res As Resource, Asn As Assignment
    For Each Res In ActiveProject.Resources
        If Not Res Is Nothing Then
            Debug.Print Res.Name
            For Each Asn In Res.Assignments
                Debug.Print , Asn.TaskName; Asn.Work
            Next
        End If
    Next
End Sub

Regards
Venkata Krishna

ps:Work is displayed in minutes