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

    Application.StatusBar = vStatus

 

End Sub

 

如果所选区域是连续区域(

Areas.Count = 1

),那么再判断该区域是两行还是两列,接着使用工作表函数

SUM

函数来求第一个的和及第二个的和,并将它们相减;如果该区域超出了两行或两列,则状态栏不显示自定义的信息。

 

如果所选区域非连续(

Areas.Count = 2

),那么判断这两个区域是否都是仅

1

列或者仅

1

行,如果其中有一个区域多于

1

行或

1

列,则重置状态栏,否则,两个区域的数值相减。

 

最后,在