vba question between project and powerpoint

[smithwillls]

in VBA, other than using the shell command e.g.
Sub StartPowerpoint1()
Shell "C:\Program Files\Microsoft Office\office\POWERPNT.EXE", 3
End Sub

how can you open a powerpoint document and create boxes in it from ms project.

e.g. is it possible to do something like :
Sub openPowerpoint1()
Dim x As Object
Set x = GetObject(, "Powerpoint.Application&quot
End Sub

 

[PDQBach]

Why would you want to do that?

 

[smithwillls]

To be able to produce a Gantt like chart, where tasks for the same stream can be laid out on the same line (assuming they're not in parallel).

This provides for a better view, particularly when plans are for an implementation over a weekend (i.e. a short period), and everyone needs to see the predecessors and successors of a task. This method also allows you to depict the length of the task by size of the box as well as showing the different streams in different colours.

The output is a highbred between PERT and GANTT charts with colour thrown in.

We already have something like this, but the plans are produced using Excel. I would prefer to replace the Excel method with MS Project and take advantage of the many planning tools in MS Project.

 

[smithwillls]

its ok, I have found the solution :

Sub StartPowerpoint2()
Set objPPT = New PowerPoint.Application
objPPT.Visible = True
.
.
.
End Sub