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

            vStatus = False

        End If

    ElseIf rSel.Areas.Count = 2 Then

        If (rSel.Areas(1).Columns.Count = 1 AndrSel.Areas(2).Columns.Count = 1) Or (rSel.Areas(1).Rows.Count = 1 AndrSel.Areas(2).Rows.Count = 1) Then

            vStatus = "

相差

: "& Format(wf.Sum(rSel.Areas(1)) - wf.Sum(rSel.Areas(2)),"#,##0.00")

        End If

    Else

        vStatus = False

    End If