以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何清空选定区域?  (http://foxtable.net/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