Ureader.com  
Microsoft software help and Community
   home   |   control panel login   |   archive   |  
 
other
informationbridge
office.intranets
office.misc
office.setup
office.xml
officeupdate
onenote
photodraw.discussion
powerpoint
producer
proj.standard&server
project
project.developer
project.pro_and_serve
project.server
project.vba
project2000
publisher
publisher.prepress
publisher.programming
publisher.webdesign
visio
visio.createshapes
visio.database.modeling
visio.dev.diagrams
visio.dev.shapesheet
visio.dev.vba
visio.dev.vc
visio.developer
visio.general
visio.installation
visio.printing
visio.software.modeling
visio.troubleshoot
  
 
date: Fri, 11 Jul 2008 01:11:00 -0700,    group: microsoft.public.project.developer        back       


What is The step correct for close MSProject ?   
Hello, I'm open the MSProject, work, 
but don't close correct MSProject because in the process WINPROJ.EXE is 
always present.
What is The step correct for close MSProject ?


Dim Project    As Object 'MSProject.Project
Dim ObjProject As Object 'MSProject.Application

Set Project = CreateObject("MSProject.Project")
Set ObjProject = Project.Application 'Set ObjProject = 
CreateObject("MSProject.Application")


ObjProject.FileNew

.........

ObjProject.FileSaveAs (NomeFile)

ObjProject.FileClose 1
ObjProject.Quit
Set ObjProject = Nothing
Set Project = Nothing
date: Fri, 11 Jul 2008 01:11:00 -0700   author:   Enrico

Re: What is The step correct for close MSProject ?   
Hi,

Your.Quit should do it, especially when you set it to Nothing as well.

-- 

Rod Gill
Microsoft MVP for Project

Author of the only book on Project VBA, see:
http://www.projectvbabook.com



"Enrico"  wrote in message 
news:533CCB7B-A555-400B-AADE-B752CBA3687E@microsoft.com...
> Hello, I'm open the MSProject, work,
> but don't close correct MSProject because in the process WINPROJ.EXE is
> always present.
> What is The step correct for close MSProject ?
>
>
> Dim Project    As Object 'MSProject.Project
> Dim ObjProject As Object 'MSProject.Application
>
> Set Project = CreateObject("MSProject.Project")
> Set ObjProject = Project.Application 'Set ObjProject =
> CreateObject("MSProject.Application")
>
>
> ObjProject.FileNew
>
> .........
>
> ObjProject.FileSaveAs (NomeFile)
>
> ObjProject.FileClose 1
> ObjProject.Quit
> Set ObjProject = Nothing
> Set Project = Nothing
>
date: Fri, 11 Jul 2008 20:18:48 +1200   author:   Rod Gill rodATproject-systemsDOTcoDOTnz

Google
 
Web ureader.com


    COPYRIGHT 2007, YARDI TECHNOLOGY LIMITED, ALL RIGHT RESERVE  |   contact us