以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何清空选定区域？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117156)
--  作者：煜杭
--  发布时间：2018/4/8 7:29:00
--  如何清空选定区域？

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


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


我想把选定区域内清空（=nothing)，有什么办法吗？
--  作者：有点甜
--  发布时间：2018/4/8 8:25:00
--  

参考代码

 

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