主题：如何清空选定区域？

Dim Sum As Double
With CurrentTable
    Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
End With
OutPut.Show(Sum)

这个是统计选定区域的值，

我想把选定区域内清空（=nothing)，有什么办法吗？

参考代码

Dim t As Table = Tables("表B")
For i As Integer = t.TopPosition To t.BottomPosition
    For  j As Integer = t.LeftCol To t.RightCol
        t.rows(i)(j) = Nothing
    Next
Next