在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）