Excel的VBA SUM公式显示在单元格

Question

我从一个程序叫下面的常规

Sub DoTotals() 

    With ActiveSheet.Cells(Rows.Count, "F").End(xlUp)(2, 1) 
    .Formula = "=SUM(F2:" & .Offset(-1, 0).Address & ")" 
    End With 

End Sub 

单元格中显示的结果是不求和的结果，但 =SUM(F$1:$F2)

我已经在其他Excel文档中使用了相同的例程，但它正确地返回了总和 - 不是在这一个中。

Answer 1

细胞可能已被格式化为文本.......尝试：

Sub DoTotals() 
With ActiveSheet.Cells(Rows.Count, "F").End(xlUp)(2, 1) 
    .Clear 
    .Formula = "=SUM(F2:" & .Offset(-1, 0).Address & ")" 
End With 
End Sub 

编辑＃1：

也许窗口是在错误的显示模式：

Sub DoTotals() 
    With ActiveSheet.Cells(Rows.Count, "F").End(xlUp)(2, 1) 
     .Clear 
     .Formula = "=SUM(F2:" & .Offset(-1, 0).Address & ")" 
    End With 
     ActiveWindow.DisplayFormulas = False 
End Sub