vb.net - FormulaR1C1 不适用于 SUMME

Question

FormulaR1C1 方法无法正常工作。

objExcel = CreateObject("Excel.Application")
    objWorkbook = objExcel.Workbooks.Add
    Dim Formula As String
    Formula = "=SUMME(Z1S1;Z2S1)"
    For i = 1 To 5 Step 1
        objWorkbook.Worksheets("Tabelle1").Cells(i, 1).FormulaR1C1 = 5
        objWorkbook.Worksheets("Tabelle1").Cells(i, 5).FormulaR1C1 = "Text"
        objWorkbook.Worksheets("Tabelle1").Cells(i, 3).FormulaR1C1 = Formula
    Next

这应该在第三列中给我 10 5 次，但事实并非如此。我什至尝试过:

Formula = "=SUMME(Z[0]S[-2];Z[1]S[-2])"

但这也不起作用。到达分配线时，循环会中断:(。如果我尝试使用

Formula = "=SUMME(Z1S1,Z2S1)"

它完全执行，但它不适用于 excel，因为它在 Excel 字段中显示 =SUMME('Z1S1';'Z2S1')

Answer 1

您必须使用 Range.FormulaLocal property或 Range.FormulaR1C1Local property如果您打算使用包含非 EN-US 函数的字符串。 VB网预计 EN-US 公式，并将其翻译为工作表的区域语言。

Formula = "=SUM(A1, B2)"
'or depending on your requiements,
Formula = "=SUM(A1:B2)"
.Formula = Formula

Formula = "=SUM(R1C1, R2C2)"
'or depending on your requiements,
Formula = "=SUM(R1C1:R2C2)"
.FormulaR1C1 = Formula

Formula = "=SUMME(Z1S1;Z2S1)"
'or depending on your requirements,
Formula = "=SUMME(Z1S1:Z2S1)"
.FormulaLocalR1C1 = Formula

不要将 xlA1 单元格引用与 xlR1C1 引用混淆。 R23 表示 xlA1 中的 Cells(23, 18) 和 xlR1C1 中的 23:23。

请注意，使用 Range.Formula property或 Range.FormulaR1C1 property强制使用逗号(EN-US 标准)而不是分号作为系统列表分隔符。


Range.Formula property
Range.FormulaR1C1 property
Range.FormulaLocal property
Range.FormulaR1C1Local property