Как передать формулу =SUMIF(AC5:AC64;">0";L5:L64) в Excel ?

← →
TransparentGhost (2004-03-11 10:04) [0]

Как передать формулу "=SUMIF(AC5:AC64;">0";L5:L64)" в Excel ?
ADDestSheet.Cells[TekRow,Col].Value:="=SUMIF(AC5:AC64;0;L5:L64)"
- такую принимает без проблем, а с условием ни в какую. Передаю через OLE. Может там какой другой синтакс?

Сенксь.

← →
TransparentGhost (2004-03-11 10:13) [1]

Забыл сказать : выдаёт ошибку "OLE error ..."

← →
vl_chel © (2004-03-11 10:26) [2]

СУММЕСЛИ(A1:A4;">160000";B1:B4)
так в справке по Excel

← →
Asdor © (2004-03-11 10:27) [3]

ADDestSheet.Cells[TekRow,Col].Formula:="=SUMIF(AC5:AC64;0;L5:L64)"

Также см. статью:
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=920

← →
TransparentGhost (2004-03-11 10:49) [4]

ADDestSheet.Cells[TekRow,Col].Formula:="=SUMIF(AC5:AC64;0;L5:L64)" - прокатывает, а
ADDestSheet.Cells[TekRow,Col].Formula:="=SUMIF(AC5:AC64;">0";L5:L64)" - нет.

И WIN и офис - англ.

У кого-нибудь это вообще прокатывает или нет?

← →
Alex* (2004-03-11 10:49) [5]

Я вот так передавал и все работало
IBookPrice.Range["H"+IntToStr(i), EmptyParam].Formula := "=D"+IntToStr(i)+"*(1+(F2-B2)%)";

← →
TransparentGhost (2004-03-11 11:04) [6]

Alex, такие формулы и у меня работают, и SUM, и ROUND и т.д. А вот SUMIF не пареваривает никакие кавычки и операнды условия.
Мне надо что бы вот ето сработало :"=SUMIF(AC5:AC64;">0";L5:L64)"

← →
Alex* (2004-03-11 11:25) [7]

> TransparentGhost

С этим не работал, попробуй в VBA скрипт для Excelя написать, если пройдет подставляй в Delphi

FormulaR1C1 = "=SUMIF(R[5]C[2]:R[14]C[2],"">0"",R[-3]C[5]:R[7]C[5])"

← →
TransparentGhost (2004-03-11 11:43) [9]

Карелин Артем, в VBA - срабатывает, а при передаче через оле - борода :o(

← →
TransparentGhost (2004-03-11 11:56) [10]

хмм... какимто боком сработало : .Value:="=SUMIF(AC5:AC64,">0",L5:L64)", хотя раньше такое не пахало.

Как передать формулу =SUMIF(AC5:AC64;">0";L5:L64) в Excel ? Найти похожие ветки