[Webinar] Learn how to a build a cloud-first strategyRegister Now


MS Project - Not Visable

Posted on 2007-10-17
Medium Priority
Last Modified: 2013-11-15

When using VBA within MSProject, I've written the following code and it will open MSProject file but not make visable.  What am I doing wrong?


Private Sub ExecuteCompare()

Dim iProjectPrimary As MSProject.Project
Dim iProjectCompare As MSProject.Project
Dim strProjectPrimary as String
Dim strProjectCompare as STring

    strProjectPrimary = "\\HOUIC-S-01117\XXXXX\My Documents\X_Files\Planning\BPMA\Sub-teams\Project1.mpp"
    strProjectCompare = "\\HOUIC-S-01117\XXXXX\My Documents\X_Files\Planning\BPMA\Sub-teams\Project2.mpp"

    Set iProjectPrimary = GetObject(strProjectPrimary)
    Set iProjectCompare = GetObject(strProjectCompare)
    iProjectPrimary.Application.Visible = True

End Sub
Question by:eciabattari
1 Comment
LVL 21

Accepted Solution

oleggold earned 2000 total points
ID: 20097139
there should be smth like iProjectPrimary.Application.Wimdow.State=<Maximized>

Featured Post

Keep up with what's happening at Experts Exchange!

Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Learn how ViaSat reduced average response times for IT incidents from 10 minutes to 30 seconds.
This article describes how to use a set of graphical playing cards to create a Draw Poker game in Excel or VB6.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

867 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question