以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  标出修改过的单元格  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=8721)

--  作者:i52117
--  发布时间:2010/12/1 16:13:00
--  标出修改过的单元格
请问,如何通过代码 在表中标出修改过的单元格,实现菜单的 标记 功能
--  作者:czy
--  发布时间:2010/12/1 16:15:00
--  
直接用系统命令好了
--  作者:czy
--  发布时间:2010/12/1 16:23:00
--  

也可以这样

 

RibbonTabs("Common")("Edit")("MarkCell").Pressed = not RibbonTabs("Common")("Edit")("MarkCell").Pressed


--  作者:i52117
--  发布时间:2010/12/1 16:25:00
--  
谢谢CZY版主,系统命令我都看了,可没找到,麻烦给个提示吧图片点击可在新窗口打开查看
--  作者:狐狸爸爸
--  发布时间:2010/12/1 16:36:00
--  

没有公开的秘密:

 

MarkModifedCell = True


--  作者:i52117
--  发布时间:2010/12/1 16:39:00
--  
谢谢狐爸,成功了!
--  作者:czy
--  发布时间:2010/12/1 16:52:00
--  
以下是引用狐狸爸爸在2010-12-1 16:36:00的发言:

没有公开的秘密:

 

MarkModifedCell = True

 

这个秘密方法效率太低,远没有系统命令来得快。

[此贴子已经被作者于2010-12-1 16:52:36编辑过]

--  作者:i52117
--  发布时间:2010/12/1 21:47:00
--  
以下是引用czy在2010-12-1 16:23:00的发言:

也可以这样

 

RibbonTabs("Common")("Edit")("MarkCell").Pressed = not RibbonTabs("Common")("Edit")("MarkCell").Pressed

czy版主您好, “RibbonTabs("功能区1")("功能组1")("状态按钮1").Pressed = not RibbonTabs("功能区1")("功能组1")("状态按钮1").Pressed” 是不是适用于状态按钮?

测试在Click事件中无反应,在PressedChanged事件中,单击后立刻关闭程序。请指教,谢谢!


--  作者:czy
--  发布时间:2010/12/1 21:53:00
--  

我是以系统菜单举例说明。

如果是自定义菜单,用的又是状态按钮,完全可以复制系统菜单的“标记”事件代码。

 

MarkModifedCell = e.ToggleButton.Pressed
For Each t As Table In Tables
    t.Refresh
Next

 

如果是窗口按钮Click事件,则可以用3楼这样的代码。

[此贴子已经被作者于2010-12-1 21:55:00编辑过]

--  作者:i52117
--  发布时间:2010/12/1 22:01:00
--  
谢谢czy版主