以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 复制粘贴 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=196507) |
-- 作者:漂亮美眉vszh -- 发布时间:2025/5/7 10:42:00 -- 复制粘贴 老师,一张表,其中某个符合条件的单元格禁止复制(注意不是某列)其他单元格允许复制粘贴,可以实现吗? |
-- 作者:有点蓝 -- 发布时间:2025/5/7 10:51:00 -- 类似:http://www.foxtable.com/webhelp/topics/3736.htm AfterSelChange Dim r As Row = e.Table.Rows(e.NewRange.Rowsel) Dim c As Col = e.Table.Cols(e.NewRange.ColSel ) If c.name = "某列" andalso r(c)="符合条件的某值" Then
e.Table.DataTable.AllowClipBoard = False Return End If e.Table.DataTable.AllowClipBoard = True |
-- 作者:漂亮美眉vszh -- 发布时间:2025/5/7 11:19:00 -- 老师,刚可能是我没表达清楚,是粘贴,不是复制。 假如我复制了7行内容,粘贴到表里时,只贴6行,其中一条符合条件的不粘贴进入, 可行吗?
[此贴子已经被作者于2025/5/7 11:20:29编辑过]
|
-- 作者:有点蓝 -- 发布时间:2025/5/7 11:22:00 -- http://www.foxtable.com/webhelp/topics/0624.htm |