Array Formulas + VB Code

[cubhasker]

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!!

 

[Bob Phillips]

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)

 

[cubhasker]

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)

Thanks Bob!! it worked