Excel实战技巧19：在状态栏中显示两个或两组单元格数值之差(6)

如果所选区域是连续区域（Areas.Count = 1），那么再判断该区域是两行还是两列，接着使用工作表函数SUM函数来求第一个的和及第二个的和，并将它们相减；如果该区域超出了两行或两列，则状态栏不显示自定义的信息。

[原文来自：www.11jj.com]

  [本文来自：www.11jj.com]

如果所选区域非连续（Areas.Count = 2），那么判断这两个区域是否都是仅1列或者仅1行，如果其中有一个区域多于1行或1列，则重置状态栏，否则，两个区域的数值相减。

最后，在Workbook_Open事件中，输入下面的代码，，将应用程序对象赋值给类变量：

Private Sub Workbook_Open()

    Set gxlApp = New 类1

    Set gxlApp.xlApp = Application

End Sub

欢迎分享本文，转载请注明出处。

欢迎在下面留言，完善本文内容，让更多的人学到更完美的知识。