你A列是不是设置成文本格式呀?
看你A列的对齐情况,如果不是特意设置的,A列应该就是文本格式。文本格式是无法自动计和的。
简单点解决的话,可以在D1填入 =A1+0 然后下拉填充,将A列转换为数字显示在D列。
有的函数计算出来的结果在状态栏就不显示值,比如=IMSUB(A1,A2) 办法就是在公式后面乘以1,如 =IMSUB(A1,A2)*1 当然只有一个数据也不显示,要以选择两个及两个以上的数据区域才可以显示,另一种情况就是用鼠标右键点击状态栏,勾选求和,因为有可能是勾选了 “ 无 ” 才不显示的。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim cell As Object
Dim i As Integer
For Each cell In Selection
i = cell + i
Next cell
Sheet1.Cells(3, 2) = i
End Sub
把上面的代码输入到你的 宏里面,其中Sheet1.Cells(3, 2)是你要把计算的结果显示的位置,
视图--打开状态栏打勾