Getting Error Message while running Macro   

Hi,

I am getting Error message while running Macro in MPP as "The Argument Value 
is not valid".

Can yopu please tell me the solution for this?

Thanks & Regards,
Jaya

date: Mon, 7 Jul 2008 04:02:03 -0700   author:   Jayalakshmi

RE: Getting Error Message while running Macro   

Jaya,

Please could you provide some more details as your request is a little vague.

However take a look at http://support.microsoft.com/kb/242723 as it might 
hold some hints for you.

Have a good day

"Jayalakshmi" wrote:

> Hi,
> 
> I am getting Error message while running Macro in MPP as "The Argument Value 
> is not valid".
> 
> Can yopu please tell me the solution for this?
> 
> Thanks & Regards,
> Jaya

date: Mon, 7 Jul 2008 04:37:01 -0700   author:   Andrew Jacks

RE: Getting Error Message while running Macro   

Posting the code for the macro and where it is stopping would be useful for 
determining the solution to your problem. Can you post the code here?

-Jack Dahlgren

"Jayalakshmi" wrote:

> Hi,
> 
> I am getting Error message while running Macro in MPP as "The Argument Value 
> is not valid".
> 
> Can yopu please tell me the solution for this?
> 
> Thanks & Regards,
> Jaya

date: Mon, 7 Jul 2008 11:18:00 -0700   author:   Jack Dahlgren

RE: Getting Error Message while running Macro   

Hi,

I am having Enterprise Projects in Project Server 2003. While running this 
macro, for some projects its showing result in "Enterprise Cost" field. For 
some projects its showing error message as specified in my previous mail. Pl 
give me some solution.

Sub MaterialsCost()
Dim Tsk As Task
Dim Res As Resource
Dim Assgn As Assignment
    For Each Tsk In ActiveProject.Tasks
        If Not Tsk Is Nothing Then
            Tsk.EnterpriseCost1 = 0
            For Each Assgn In Tsk.Assignments
                Set Res = ActiveProject.Resources(Assgn.ResourceID)
                If Res.Type = pjResourceTypeMaterial Then
                    Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + Assgn.Cost
                End If
            Next Assgn
        End If
    Next Tsk
End Sub



Thanks & Regrds,
Jaya

"Jack Dahlgren" wrote:

> Posting the code for the macro and where it is stopping would be useful for 
> determining the solution to your problem. Can you post the code here?
> 
> -Jack Dahlgren
> 
> "Jayalakshmi" wrote:
> 
> > Hi,
> > 
> > I am getting Error message while running Macro in MPP as "The Argument Value 
> > is not valid".
> > 
> > Can yopu please tell me the solution for this?
> > 
> > Thanks & Regards,
> > Jaya

date: Mon, 7 Jul 2008 21:08:00 -0700   author:   Jayalakshmi

Re: Getting Error Message while running Macro   

Which line of code is causing the problem? This looks like one of my macros!

-- 

Rod Gill
Microsoft MVP for Project

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



"Jayalakshmi"  wrote in message 
news:56BF3859-DB9D-4B6E-8B46-366234B9E3CA@microsoft.com...
> Hi,
>
> I am having Enterprise Projects in Project Server 2003. While running this
> macro, for some projects its showing result in "Enterprise Cost" field. 
> For
> some projects its showing error message as specified in my previous mail. 
> Pl
> give me some solution.
>
> Sub MaterialsCost()
> Dim Tsk As Task
> Dim Res As Resource
> Dim Assgn As Assignment
>    For Each Tsk In ActiveProject.Tasks
>        If Not Tsk Is Nothing Then
>            Tsk.EnterpriseCost1 = 0
>            For Each Assgn In Tsk.Assignments
>                Set Res = ActiveProject.Resources(Assgn.ResourceID)
>                If Res.Type = pjResourceTypeMaterial Then
>                    Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + Assgn.Cost
>                End If
>            Next Assgn
>        End If
>    Next Tsk
> End Sub
>
>
>
> Thanks & Regrds,
> Jaya
>
> "Jack Dahlgren" wrote:
>
>> Posting the code for the macro and where it is stopping would be useful 
>> for
>> determining the solution to your problem. Can you post the code here?
>>
>> -Jack Dahlgren
>>
>> "Jayalakshmi" wrote:
>>
>> > Hi,
>> >
>> > I am getting Error message while running Macro in MPP as "The Argument 
>> > Value
>> > is not valid".
>> >
>> > Can yopu please tell me the solution for this?
>> >
>> > Thanks & Regards,
>> > Jaya

date: Tue, 8 Jul 2008 16:31:18 +1200   author:   Rod Gill rodATproject-systemsDOTcoDOTnz

Re: Getting Error Message while running Macro   

Rod,

Yes, its yours. While running macro in Project its showing error Messgae 
that "This argument is not Valid". Its not showing result in Custom Field.But 
its not mentioning the line of code!

Thanks
Jaya

"Rod Gill" wrote:

> Which line of code is causing the problem? This looks like one of my macros!
> 
> -- 
> 
> Rod Gill
> Microsoft MVP for Project
> 
> Author of the only book on Project VBA, see:
> http://www.projectvbabook.com
> 
> 
> 
> "Jayalakshmi"  wrote in message 
> news:56BF3859-DB9D-4B6E-8B46-366234B9E3CA@microsoft.com...
> > Hi,
> >
> > I am having Enterprise Projects in Project Server 2003. While running this
> > macro, for some projects its showing result in "Enterprise Cost" field. 
> > For
> > some projects its showing error message as specified in my previous mail. 
> > Pl
> > give me some solution.
> >
> > Sub MaterialsCost()
> > Dim Tsk As Task
> > Dim Res As Resource
> > Dim Assgn As Assignment
> >    For Each Tsk In ActiveProject.Tasks
> >        If Not Tsk Is Nothing Then
> >            Tsk.EnterpriseCost1 = 0
> >            For Each Assgn In Tsk.Assignments
> >                Set Res = ActiveProject.Resources(Assgn.ResourceID)
> >                If Res.Type = pjResourceTypeMaterial Then
> >                    Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + Assgn.Cost
> >                End If
> >            Next Assgn
> >        End If
> >    Next Tsk
> > End Sub
> >
> >
> >
> > Thanks & Regrds,
> > Jaya
> >
> > "Jack Dahlgren" wrote:
> >
> >> Posting the code for the macro and where it is stopping would be useful 
> >> for
> >> determining the solution to your problem. Can you post the code here?
> >>
> >> -Jack Dahlgren
> >>
> >> "Jayalakshmi" wrote:
> >>
> >> > Hi,
> >> >
> >> > I am getting Error message while running Macro in MPP as "The Argument 
> >> > Value
> >> > is not valid".
> >> >
> >> > Can yopu please tell me the solution for this?
> >> >
> >> > Thanks & Regards,
> >> > Jaya 
> 
>

date: Mon, 7 Jul 2008 23:54:00 -0700   author:   Jayalakshmi

Re: Getting Error Message while running Macro   

There is no on error resume next statement, so when there is an error it 
should should a message with and end and a debug button on it. Click the 
debug button and tell us which statement is highlighted in yellow.

-- 

Rod Gill
Microsoft MVP for Project

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



"Jayalakshmi"  wrote in message 
news:FD012890-0D37-4950-83E3-52C694C223AC@microsoft.com...
> Rod,
>
> Yes, its yours. While running macro in Project its showing error Messgae
> that "This argument is not Valid". Its not showing result in Custom 
> Field.But
> its not mentioning the line of code!
>
> Thanks
> Jaya
>
> "Rod Gill" wrote:
>
>> Which line of code is causing the problem? This looks like one of my 
>> macros!
>>
>> -- 
>>
>> Rod Gill
>> Microsoft MVP for Project
>>
>> Author of the only book on Project VBA, see:
>> http://www.projectvbabook.com
>>
>>
>>
>> "Jayalakshmi"  wrote in message
>> news:56BF3859-DB9D-4B6E-8B46-366234B9E3CA@microsoft.com...
>> > Hi,
>> >
>> > I am having Enterprise Projects in Project Server 2003. While running 
>> > this
>> > macro, for some projects its showing result in "Enterprise Cost" field.
>> > For
>> > some projects its showing error message as specified in my previous 
>> > mail.
>> > Pl
>> > give me some solution.
>> >
>> > Sub MaterialsCost()
>> > Dim Tsk As Task
>> > Dim Res As Resource
>> > Dim Assgn As Assignment
>> >    For Each Tsk In ActiveProject.Tasks
>> >        If Not Tsk Is Nothing Then
>> >            Tsk.EnterpriseCost1 = 0
>> >            For Each Assgn In Tsk.Assignments
>> >                Set Res = ActiveProject.Resources(Assgn.ResourceID)
>> >                If Res.Type = pjResourceTypeMaterial Then
>> >                    Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + 
>> > Assgn.Cost
>> >                End If
>> >            Next Assgn
>> >        End If
>> >    Next Tsk
>> > End Sub
>> >
>> >
>> >
>> > Thanks & Regrds,
>> > Jaya
>> >
>> > "Jack Dahlgren" wrote:
>> >
>> >> Posting the code for the macro and where it is stopping would be 
>> >> useful
>> >> for
>> >> determining the solution to your problem. Can you post the code here?
>> >>
>> >> -Jack Dahlgren
>> >>
>> >> "Jayalakshmi" wrote:
>> >>
>> >> > Hi,
>> >> >
>> >> > I am getting Error message while running Macro in MPP as "The 
>> >> > Argument
>> >> > Value
>> >> > is not valid".
>> >> >
>> >> > Can yopu please tell me the solution for this?
>> >> >
>> >> > Thanks & Regards,
>> >> > Jaya
>>
>>

date: Tue, 8 Jul 2008 22:43:21 +1200   author:   Rod Gill rodATproject-systemsDOTcoDOTnz

Re: Getting Error Message while running Macro   

Hi Gill,

Its showing error in 7th line(Tsk.EnterpriseCost1=0) of the below specified 
code.

Sub Material_Cost()
Dim Tsk As Task
Dim Res As Resource
Dim Assgn As Assignment
    For Each Tsk In ActiveProject.Tasks
        If Not Tsk Is Nothing Then
            Tsk.EnterpriseCost1 = 0
            For Each Assgn In Tsk.Assignments
                Set Res = ActiveProject.Resources(Assgn.ResourceID)
                If Res.Type = pjResourceTypeMaterial Then
                    Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + Assgn.Cost
                End If
            Next Assgn
        End If
    Next Tsk
End Sub

Help me wi th this.

Thanks & Regards,
Jaya

"Rod Gill" wrote:

> There is no on error resume next statement, so when there is an error it 
> should should a message with and end and a debug button on it. Click the 
> debug button and tell us which statement is highlighted in yellow.
> 
> -- 
> 
> Rod Gill
> Microsoft MVP for Project
> 
> Author of the only book on Project VBA, see:
> http://www.projectvbabook.com
> 
> 
> 
> "Jayalakshmi"  wrote in message 
> news:FD012890-0D37-4950-83E3-52C694C223AC@microsoft.com...
> > Rod,
> >
> > Yes, its yours. While running macro in Project its showing error Messgae
> > that "This argument is not Valid". Its not showing result in Custom 
> > Field.But
> > its not mentioning the line of code!
> >
> > Thanks
> > Jaya
> >
> > "Rod Gill" wrote:
> >
> >> Which line of code is causing the problem? This looks like one of my 
> >> macros!
> >>
> >> -- 
> >>
> >> Rod Gill
> >> Microsoft MVP for Project
> >>
> >> Author of the only book on Project VBA, see:
> >> http://www.projectvbabook.com
> >>
> >>
> >>
> >> "Jayalakshmi"  wrote in message
> >> news:56BF3859-DB9D-4B6E-8B46-366234B9E3CA@microsoft.com...
> >> > Hi,
> >> >
> >> > I am having Enterprise Projects in Project Server 2003. While running 
> >> > this
> >> > macro, for some projects its showing result in "Enterprise Cost" field.
> >> > For
> >> > some projects its showing error message as specified in my previous 
> >> > mail.
> >> > Pl
> >> > give me some solution.
> >> >
> >> > Sub MaterialsCost()
> >> > Dim Tsk As Task
> >> > Dim Res As Resource
> >> > Dim Assgn As Assignment
> >> >    For Each Tsk In ActiveProject.Tasks
> >> >        If Not Tsk Is Nothing Then
> >> >            Tsk.EnterpriseCost1 = 0
> >> >            For Each Assgn In Tsk.Assignments
> >> >                Set Res = ActiveProject.Resources(Assgn.ResourceID)
> >> >                If Res.Type = pjResourceTypeMaterial Then
> >> >                    Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + 
> >> > Assgn.Cost
> >> >                End If
> >> >            Next Assgn
> >> >        End If
> >> >    Next Tsk
> >> > End Sub
> >> >
> >> >
> >> >
> >> > Thanks & Regrds,
> >> > Jaya
> >> >
> >> > "Jack Dahlgren" wrote:
> >> >
> >> >> Posting the code for the macro and where it is stopping would be 
> >> >> useful
> >> >> for
> >> >> determining the solution to your problem. Can you post the code here?
> >> >>
> >> >> -Jack Dahlgren
> >> >>
> >> >> "Jayalakshmi" wrote:
> >> >>
> >> >> > Hi,
> >> >> >
> >> >> > I am getting Error message while running Macro in MPP as "The 
> >> >> > Argument
> >> >> > Value
> >> >> > is not valid".
> >> >> >
> >> >> > Can yopu please tell me the solution for this?
> >> >> >
> >> >> > Thanks & Regards,
> >> >> > Jaya
> >>
> >> 
> 
>

date: Wed, 16 Jul 2008 03:10:29 -0700   author:   Jayalakshmi

Re: Getting Error Message while running Macro   

What's the error?

-- 
Stephen Sanderlin
Principal Consultant 
MSProjectExperts
For Project Server Consulting: http://www.msprojectexperts.com
For Project Server Training: http://www.projectservertraining.com

Owner/Founder - EPMFAQ
http://www.epmfaq.com/
http://forums.epmfaq.com/


Jayalakshmi wrote:

> Hi Gill,
> 
> Its showing error in 7th line(Tsk.EnterpriseCost1=0) of the below
> specified code.
> 
> Sub Material_Cost()
> Dim Tsk As Task
> Dim Res As Resource
> Dim Assgn As Assignment
>     For Each Tsk In ActiveProject.Tasks
>         If Not Tsk Is Nothing Then
>             Tsk.EnterpriseCost1 = 0
>             For Each Assgn In Tsk.Assignments
>                 Set Res = ActiveProject.Resources(Assgn.ResourceID)
>                 If Res.Type = pjResourceTypeMaterial Then
>                     Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 +
> Assgn.Cost                 End If
>             Next Assgn
>         End If
>     Next Tsk
> End Sub
> 
> Help me wi th this.
> 
> Thanks & Regards,
> Jaya
> 
> "Rod Gill" wrote:
> 
> > There is no on error resume next statement, so when there is an
> > error it should should a message with and end and a debug button on
> > it. Click the debug button and tell us which statement is
> > highlighted in yellow.
> > 
> > -- 
> > 
> > Rod Gill
> > Microsoft MVP for Project
> > 
> > Author of the only book on Project VBA, see:
> > http://www.projectvbabook.com
> > 
> > 
> > 
> > "Jayalakshmi"  wrote in
> > message news:FD012890-0D37-4950-83E3-52C694C223AC@microsoft.com...
> > > Rod,
> > > 
> > > Yes, its yours. While running macro in Project its showing error
> > > Messgae that "This argument is not Valid". Its not showing result
> > > in Custom Field.But
> > > its not mentioning the line of code!
> > > 
> > > Thanks
> > > Jaya
> > > 
> > > "Rod Gill" wrote:
> > > 
> > >> Which line of code is causing the problem? This looks like one
> > of my >> macros!
> > > > 
> > >> -- 
> > > > 
> > >> Rod Gill
> > >> Microsoft MVP for Project
> > > > 
> > >> Author of the only book on Project VBA, see:
> > >> http://www.projectvbabook.com
> > > > 
> > > > 
> > > > 
> > >> "Jayalakshmi"  wrote in
> > message >>
> > news:56BF3859-DB9D-4B6E-8B46-366234B9E3CA@microsoft.com...  >> > Hi,
> > >> >
> > >> > I am having Enterprise Projects in Project Server 2003. While
> > running >> > this
> > >> > macro, for some projects its showing result in "Enterprise
> > Cost" field.  >> > For
> > >> > some projects its showing error message as specified in my
> > previous >> > mail.
> > >> > Pl
> > >> > give me some solution.
> > >> >
> > >> > Sub MaterialsCost()
> > >> > Dim Tsk As Task
> > >> > Dim Res As Resource
> > >> > Dim Assgn As Assignment
> > >> >    For Each Tsk In ActiveProject.Tasks
> > >> >        If Not Tsk Is Nothing Then
> > >> >            Tsk.EnterpriseCost1 = 0
> > >> >            For Each Assgn In Tsk.Assignments
> > >> >                Set Res =
> > ActiveProject.Resources(Assgn.ResourceID) >> >                If
> > Res.Type = pjResourceTypeMaterial Then >> >
> > Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + >> > Assgn.Cost
> > >> >                End If
> > >> >            Next Assgn
> > >> >        End If
> > >> >    Next Tsk
> > >> > End Sub
> > >> >
> > >> >
> > >> >
> > >> > Thanks & Regrds,
> > >> > Jaya
> > >> >
> > >> > "Jack Dahlgren" wrote:
> > >> >
> > >> >> Posting the code for the macro and where it is stopping would
> > be >> >> useful
> > >> >> for
> > >> >> determining the solution to your problem. Can you post the
> > code here?  >> >>
> > >> >> -Jack Dahlgren
> > >> >>
> > >> >> "Jayalakshmi" wrote:
> > >> >>
> > >> >> > Hi,
> > >> >> >
> > >> >> > I am getting Error message while running Macro in MPP as
> > "The >> >> > Argument
> > >> >> > Value
> > >> >> > is not valid".
> > >> >> >
> > >> >> > Can yopu please tell me the solution for this?
> > >> >> >
> > >> >> > Thanks & Regards,
> > >> >> > Jaya
> > > > 
> > >> 
> > 
> >

date: Wed, 16 Jul 2008 07:11:31 -0700   author:   Stephen Sanderlin stephen DOTNOSPAM sanderlin NOSPAMAT msprojectexperts DOTNOSPAM com

Re: Getting Error Message while running Macro   

Hi Gill,

Help me!

I am using this Macro in MS Project Professional 2003. This macro is running 
& getting result in which project is not having WBS. If a project is having 
WBS, Macro is not running &  its showing error that "This argument is not 
valid". What to do? Can you give solution for this?

Thanks in Advance!

Regards,
Jaya

"Jayalakshmi" wrote:

> Hi Gill,
> 
> Its showing error in 7th line(Tsk.EnterpriseCost1=0) of the below specified 
> code.
> 
> Sub Material_Cost()
> Dim Tsk As Task
> Dim Res As Resource
> Dim Assgn As Assignment
>     For Each Tsk In ActiveProject.Tasks
>         If Not Tsk Is Nothing Then
>             Tsk.EnterpriseCost1 = 0
>             For Each Assgn In Tsk.Assignments
>                 Set Res = ActiveProject.Resources(Assgn.ResourceID)
>                 If Res.Type = pjResourceTypeMaterial Then
>                     Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + Assgn.Cost
>                 End If
>             Next Assgn
>         End If
>     Next Tsk
> End Sub
> 
> Help me wi th this.
> 
> Thanks & Regards,
> Jaya
> 
> "Rod Gill" wrote:
> 
> > There is no on error resume next statement, so when there is an error it 
> > should should a message with and end and a debug button on it. Click the 
> > debug button and tell us which statement is highlighted in yellow.
> > 
> > -- 
> > 
> > Rod Gill
> > Microsoft MVP for Project
> > 
> > Author of the only book on Project VBA, see:
> > http://www.projectvbabook.com
> > 
> > 
> > 
> > "Jayalakshmi"  wrote in message 
> > news:FD012890-0D37-4950-83E3-52C694C223AC@microsoft.com...
> > > Rod,
> > >
> > > Yes, its yours. While running macro in Project its showing error Messgae
> > > that "This argument is not Valid". Its not showing result in Custom 
> > > Field.But
> > > its not mentioning the line of code!
> > >
> > > Thanks
> > > Jaya
> > >
> > > "Rod Gill" wrote:
> > >
> > >> Which line of code is causing the problem? This looks like one of my 
> > >> macros!
> > >>
> > >> -- 
> > >>
> > >> Rod Gill
> > >> Microsoft MVP for Project
> > >>
> > >> Author of the only book on Project VBA, see:
> > >> http://www.projectvbabook.com
> > >>
> > >>
> > >>
> > >> "Jayalakshmi"  wrote in message
> > >> news:56BF3859-DB9D-4B6E-8B46-366234B9E3CA@microsoft.com...
> > >> > Hi,
> > >> >
> > >> > I am having Enterprise Projects in Project Server 2003. While running 
> > >> > this
> > >> > macro, for some projects its showing result in "Enterprise Cost" field.
> > >> > For
> > >> > some projects its showing error message as specified in my previous 
> > >> > mail.
> > >> > Pl
> > >> > give me some solution.
> > >> >
> > >> > Sub MaterialsCost()
> > >> > Dim Tsk As Task
> > >> > Dim Res As Resource
> > >> > Dim Assgn As Assignment
> > >> >    For Each Tsk In ActiveProject.Tasks
> > >> >        If Not Tsk Is Nothing Then
> > >> >            Tsk.EnterpriseCost1 = 0
> > >> >            For Each Assgn In Tsk.Assignments
> > >> >                Set Res = ActiveProject.Resources(Assgn.ResourceID)
> > >> >                If Res.Type = pjResourceTypeMaterial Then
> > >> >                    Tsk.EnterpriseCost1 = Tsk.EnterpriseCost1 + 
> > >> > Assgn.Cost
> > >> >                End If
> > >> >            Next Assgn
> > >> >        End If
> > >> >    Next Tsk
> > >> > End Sub
> > >> >
> > >> >
> > >> >
> > >> > Thanks & Regrds,
> > >> > Jaya
> > >> >
> > >> > "Jack Dahlgren" wrote:
> > >> >
> > >> >> Posting the code for the macro and where it is stopping would be 
> > >> >> useful
> > >> >> for
> > >> >> determining the solution to your problem. Can you post the code here?
> > >> >>
> > >> >> -Jack Dahlgren
> > >> >>
> > >> >> "Jayalakshmi" wrote:
> > >> >>
> > >> >> > Hi,
> > >> >> >
> > >> >> > I am getting Error message while running Macro in MPP as "The 
> > >> >> > Argument
> > >> >> > Value
> > >> >> > is not valid".
> > >> >> >
> > >> >> > Can yopu please tell me the solution for this?
> > >> >> >
> > >> >> > Thanks & Regards,
> > >> >> > Jaya
> > >>
> > >> 
> > 
> >

date: Tue, 29 Jul 2008 00:21:01 -0700   author:   Jayalakshmi