Can anyone figure out why this line of code creates the compile error
message "expected expression"? I am trying to put a formula array
into a cell.

Selection.FormulaArray = _
"=SUM(IF('Raw data'!R4C6:R" & MaxRowSource & "C6=RC2,IF('Raw data'!
R4C" & SourceDOWCol & ":R" & MaxRowSource & "C" & SourceDOWCol &
=""x"", _
"IF('Raw data'!R4C17:R" & MaxRowSource & "C17<R3C,IF('Raw data'!
R4C18:R" & MaxRowSource & "C18R3C,'Raw data'!R4C16:R" & MaxRowSource
& "C16)))))"

Thanks,
Chet

Hi

It seems that you have to many quotation signs in the formula string.
This should do it:

Selection.FormulaArray = _
"=SUM(IF('Raw data'!R4C6:R" & MaxRowSource & "C6=RC2,IF('Raw
data'! R4C" _
& SourceDOWCol & ":R" & MaxRowSource & "C" & SourceDOWCol & _
"=""x"", IF('Raw data'!R4C17:R" & MaxRowSource & _
"C17<R3C,IF('Raw data'! R4C18:R" & MaxRowSource & _
"C18R3C,'Raw data'!R4C16:R" & MaxRowSource & "C16)))))"

Regards,
Per

On 27 Mar., 21:19, Chet wrote:
Can anyone figure out why this line of code creates the compile error
message "expected expression"? *I am trying to put a formula array
into a cell.

Selection.FormulaArray = _
"=SUM(IF('Raw data'!R4C6:R" & MaxRowSource & "C6=RC2,IF('Raw data'!
R4C" & SourceDOWCol & ":R" & MaxRowSource & "C" & SourceDOWCol &
=""x"", _
"IF('Raw data'!R4C17:R" & MaxRowSource & "C17<R3C,IF('Raw data'!
R4C18:R" & MaxRowSource & "C18R3C,'Raw data'!R4C16:R" & MaxRowSource
& "C16)))))"

Thanks,
Chet

On Mar 27, 1:31*pm, Per Jessen wrote:
Hi

It seems that you have to many quotation signs in the formula string.
This should do it:

Selection.FormulaArray = _
* * "=SUM(IF('Raw data'!R4C6:R" & MaxRowSource & "C6=RC2,IF('Raw
data'! R4C" _
* * & SourceDOWCol & ":R" & MaxRowSource & "C" & SourceDOWCol & _
* * "=""x"", IF('Raw data'!R4C17:R" & MaxRowSource & _
* * "C17<R3C,IF('Raw data'! R4C18:R" & MaxRowSource & _
* * "C18R3C,'Raw data'!R4C16:R" & MaxRowSource & "C16)))))"

Regards,
Per

On 27 Mar., 21:19, Chet wrote:



Can anyone figure out why this line of code creates the compile error
message "expected expression"? *I am trying to put a formula array
into a cell.

Selection.FormulaArray = _
"=SUM(IF('Raw data'!R4C6:R" & MaxRowSource & "C6=RC2,IF('Raw data'!
R4C" & SourceDOWCol & ":R" & MaxRowSource & "C" & SourceDOWCol &
=""x"", _
"IF('Raw data'!R4C17:R" & MaxRowSource & "C17<R3C,IF('Raw data'!
R4C18:R" & MaxRowSource & "C18R3C,'Raw data'!R4C16:R" & MaxRowSource
& "C16)))))"

Thanks,
Chet- Hide quoted text -

- Show quoted text -

Thank you.. that worked splendidly! Chet