Re: communication with MS Project
From: Tom Ogilvy (twogilvy_at_msn.com)
Date: 09/23/04
- Next message: jngi: "PivotTables/VBA"
- Previous message: madbloke: "UserForm code help needed."
- In reply to: Anne: "communication with MS Project"
- Messages sorted by: [ date ] [ thread ]
Date: Thu, 23 Sep 2004 07:50:00 -0400
If a block of code protected by an IF statement is not executed, the obvious
cause is that the condition specified in the If statement is not passed. I
would begin debugging by figuring out what the value of Check_TP_A is
before you hit the IF statement and make sure it is being defined correctly
and so forth.
--
Regards,
Tom Ogilvy
"Anne" <anonymous@discussions.microsoft.com> wrote in message
news:459601c4a150$f19d9af0$a501280a@phx.gbl...
> Hi,
>
> I have an application in Excel which communicates with MS
> Project. The syntax might be correct (no error message),
> but it is not executed. I cannot imagine why and I find no
> hint in the object catalogue.
> My code:
>
> Dim Projekt As Object
> ' start Project
> Set Projekt = CreateObject("MSProject.Project")
> Projekt.Application.FileOpen newTimeSchedule
>
> '*****this is the part which is not executed
> If Check_TP_A.Value = False Then 'CheckBox
> Projekt.Application.SelectTaskField Row:=0,
> Column:="Name"
> Projekt.Application.SetTaskField Field:="%
> Abgeschlossen", Value:="100", AllSelectedTasks:=True
> End If
> '*****
> Projekt.Application.FileClose pjSave
> 'Close MSProject
> Projekt.Application.Quit pjDoNotSave
>
> Thanks for every hint!
>
> Anne
>
>
- Next message: jngi: "PivotTables/VBA"
- Previous message: madbloke: "UserForm code help needed."
- In reply to: Anne: "communication with MS Project"
- Messages sorted by: [ date ] [ thread ]
Relevant Pages
|