大众计算机学习网

专门提供各种电脑教程

Excel对批注求和的方法

Admin | 2010-8-14 9:12:09 | 被阅次数 | 6175

  我们都知道,在Excel中,批注是不能进行求和的。

  但是,如果是您的批注内容,都是数字的话,我们仍然是可以对其进行求和的。只不过所使用的方法,不是普通的方法,而是必须使用VBA来完成,或者使用宏来完成。

  以下内容是示例代码,希望对您有所帮助。

  Function MyComments
  Dim MySheet As Worksheet, MyComment As Comment
  Dim MyTotal As Double
  MyTotal =0
  For Each MySheet In ActiveWorkbook.Worksheets
   For Each MyComment In MySheet.Comments
    MyTotal  = MyTotal  + MyComment.Parent.Value
   Next
  Next
  End Function

  切记,必须保证您的工作薄中的批注内容都为数字,否则,以上代码将出现异常。

  以上代码的功能是:统计当前工作薄中所有工作表内的所有批注之和。