在Excel中汇总特定值并显示在消息框中？

Question

我有一个Excel，它具有C列中的所有标记列表。 我需要一个消息框，它应该计算这些标记的总和，并在关闭Excel时显示我（或）当它点击任何快捷键时它会显示我。 我一直在使用下面的代码尝试，但它不工作：

Private Sub Workbook_BeforeClose(Cancel As Boolean) 
    Dim answer As Integer 
    answer = MsgBox("Do want to see the total?", vbYesNo + vbQuestion, "Total") 

     If answer = vbYes Then 
      Range("G1").Value = Application.Sum(Range(Cells(3, 2), Cells(3, 3000))) 
    Else 
     'do nothing 
    End If 
    End Sub 

Answer 1

如果你

If answer = vbYes Then 
    msgbox(Application.Sum(Range(Cells(2,3), Cells(3000,3))) 
End If 

什么（我换你Cells()号左右，因为你要列C，不排3）