Foxtable(狐表)用户栏目专家坐堂 → 清空内容


  共有3128人关注过本帖树形打印复制链接

主题:清空内容

帅哥哟,离线,有人找我吗?
rgbjwjb
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:651 积分:6608 威望:0 精华:0 注册:2016/12/27 21:05:00
清空内容  发帖心情 Post By:2023/8/30 8:26:00 [只看该作者]

我想对数据表中选定单元格的内容清空,怎么实现?请指教!谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110443 积分:562081 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/8/30 9:00:00 [只看该作者]

tables("A").current(tables("A").colsel) = nothing

 回到顶部
帅哥哟,离线,有人找我吗?
rgbjwjb
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:651 积分:6608 威望:0 精华:0 注册:2016/12/27 21:05:00
  发帖心情 Post By:2023/8/30 17:30:00 [只看该作者]

执行后没有反应,还麻烦下老师,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110443 积分:562081 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/8/30 17:39:00 [只看该作者]

我测试没有问题,选中一个单元格,执行后就没有值了。

Dim t As Table = Tables("表A")
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 

 回到顶部