I want to write VB code for implementing Array formulas.am new to VB
coding

Here is the array formula I have successfully written in excel

{=SUM(IF('Sheet1'!$B$7:$B$4978="Red",IF('Sheet1'!$K$7:$K
$4978="Accept",'Sheet1'!$G$7:$G$4978,0),0))}

Can someone help me out with the VB equivalent code.

Thanks!!

Activesheet.Evaluate("SUM(IF('Sheet1'!$B$7:$B$4978=""Red"",IF('Sheet1'!$K$7:$K$4978=""Accept"",'Sheet1'!$G$7:$G$4978,0),0))")

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)



<(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
>I want to write VB code for implementing Array formulas.am new to VB
> coding
>
> Here is the array formula I have successfully written in excel
>
> {=SUM(IF('Sheet1'!$B$7:$B$4978="Red",IF('Sheet1'!$K$7:$K
> $4978="Accept",'Sheet1'!$G$7:$G$4978,0),0))}
>
> Can someone help me out with the VB equivalent code.
>
> Thanks!!
>

On Mar 20, 3:03 pm, "Bob Phillips" <bob....@somewhere.com> wrote:
> Activesheet.Evaluate("SUM(IF('Sheet1'!$B$7:$B$4978=""Red"",IF('Sheet1'!$K$7:$K$4978=""Accept"",'Sheet1'!$G$7:$G$4978,0),0))")
>
> --
> ---
> HTH
>
> Bob
>
> (there's no email, no snail mail, but somewhere should be gmail in my addy)
>
> <cubhas...@gmail.com> wrote in message
>
> news:(E-Mail Removed)...
>
> >I want to write VB code for implementing Array formulas.am new to VB
> > coding
>
> > Here is the array formula I have successfully written in excel
>
> > {=SUM(IF('Sheet1'!$B$7:$B$4978="Red",IF('Sheet1'!$K$7:$K
> > $4978="Accept",'Sheet1'!$G$7:$G$4978,0),0))}
>
> > Can someone help me out with the VB equivalent code.
>
> > Thanks!!

Thanks Bob!! it worked