ZoomTimescale

[EPratt]

I'm passing data from Lotus Notes to create and populate a Microsoft Project
file. When I finish sending the data, I'd like the MSProject timescale to
automatically 'fit' the entire project on the screen.

I have tried the code supplied in the MDSN library, but the Notes compiler
will not accept it:
Sub Display()
ZoomTimescale Entire:=True
End Sub

I can, however, run the above code IF I remove the "Entire := True"
argument. But each time I run the code, I'm prompted to choose one of the
options from the Zoom dialog box. If I then choose "Entire Project", the
timescale fits perfectly.

Any ideas of how I can include this argument in my code?

 

[Jan De Messemaeker]

Can you program Sendkeys in your world?

 

[EPMdev]

pass by position instead of name:

ZoomTimescale , True

 

[EPratt]

And The Solution:

Sub CloseModule
Call (ApplicationObjectName).ZoomTimescale("", True, False, False)
End Sub

Thanks All !