Article ID: 133710
Article Last Modified on 10/11/2006
Sub Run_Project_Macro()
'Opens Microsoft Project
Shell("c:\project\winproj.exe")
'Initiates a DDE channel to Microsoft Project
Chan = DDEInitiate("WINPROJ", "system")
'Activates Microsoft Project
Application.ActivateMicrosoftApp xlMicrosoftProject
'Runs the Project global macro "AdjustDates"
Application.DDEExecute Chan, "AdjustDates"
'Terminates the DDE channel
Application.DDETerminate Chan
End Sub
Additional query words: 5.00c 8.00 97 XL97 XL
Keywords: kbhowto kbinterop kbprogramming kbdtacode KB133710