Quantcast
Channel: Project Customization and Programming forum
Viewing all articles
Browse latest Browse all 5347

Custom Reporting with Lookup Table Drop-Down Menu MS Project 2010

$
0
0

Hi,

I am trying to transfer macros written for MS Project 2007 over to Project 2010.  I was able to transfer the macros, tables, filters, and custom reports from my 2007 global template to my 2010 global template.  However, I am running into an issue with running the custom reports. 

I set up lookup tables for two columns whose values are used in the custom reporting (select project name; if not project name, select sub-project name, and the report populates based on this criteria).  There are two dialog boxes that pop up during the macro, and these dialog boxes should have drop-down menu options with either the project or sub-project name. 

However, when I run the macro (which initiates a report - VBA code to follow below), the dialog boxes pop up, but the drop-down menus are blank.  When I apply the filter on its own,  the drop-down menus in the dialog boxes are populated with the correct options.  I can't figure out why the dialog boxes are populating the correct values when I use the filter and not when I run the report.

Here is the macro - very basic and I don't see anything in here that would cause the lookup table issue: 

Sub Past_Due_Tasks()
' Past Due Tasks Macro
    projname = ActiveProject.Name
    Application.DisplayAlerts = False
    OrganizerMoveItem Type:=4, FileName:="Global.MPT", ToFileName:=ActiveProject.Name, Name:="Past Due Tasks Report"
    OrganizerMoveItem Type:=2, FileName:="Global.MPT", ToFileName:=ActiveProject.Name, Name:="Past Due Tasks"
    OrganizerMoveItem Type:=1, FileName:="Global.MPT", ToFileName:=ActiveProject.Name, Name:="Project Plan Template"
    SelectSheet
    OutlineShowSubTasks
    OutlineShowSubTasks
    OutlineShowSubTasks
    OutlineShowSubTasks
    OutlineShowSubTasks
    OutlineShowSubTasks
    OutlineShowSubTasks
    Application.DisplayAlerts = True
    ReportPrintPreview Name:="Past Due Tasks Report"
End Sub

Any help and/or insight would be greatly appreciated.  At first I thought this was due to a bug but I installed the service pack and it said my version of the software wasn't impacted by the service pack.  Apologies if any part of this description is confusing - I am happy to supply additional detail as necessary.  Many thanks in advance for your help!



Viewing all articles
Browse latest Browse all 5347

Trending Articles