Office中国论坛/Access中国论坛

标题: 如何实现复选框联动 [打印本页]

作者: lyt1985 时间: 2007-8-16 10:24
标题: 如何实现复选框联动
如何实现复习框联动大家好:
我在两个SHEET中分别放了复选框,如何实现两个表中复选框发生联动,即在第一个SHEET中选中第一个复选框,第二个SHEET中的复选框也随之联动,(注意,我说的是在数据表中放的复选框).

[ 本帖最后由 pureshadow 于 2007-8-16 22:06 编辑 ]

作者: 一点通 时间: 2007-8-16 11:05
什么叫复习框?

作者: pureshadow 时间: 2007-8-16 11:53
昨天不是回复了么？怎么同样内容又开了一个贴子？
这是昨天回复的贴子：http://www.office-cn.net/forum.p ... &extra=page%3D1

作者: lyt1985 时间: 2007-8-16 13:10
我说的说是复选框，我在数据表中加入了复选框，我想实现在第一个SHEET中选中复选框，第二个SHEET中的复选框发生联动，也随之被选中。

作者: lyt1985 时间: 2007-8-16 13:11
对了，忘记说谢谢了。

作者: pureshadow 时间: 2007-8-16 17:32
用窗体里的复选框，然后设置格式-控制，需要联动的就把单元格链接到同一个就可以了。

[ 本帖最后由 pureshadow 于 2007-8-16 17:50 编辑 ]

作者: lyt1985 时间: 2007-8-16 18:21
真不知道怎么感谢你啊！我解决了，困扰好几天了。再顺便问一下，采用编程能实现吗？

作者: pureshadow 时间: 2007-8-16 18:42
一定要编程的话。。。。。。
sheets("sheet1").CheckBoxes.Add(125, 33, 45, 30).Select
With Selection
      .Value = xlOff
      .LinkedCell = "$A$1"
      .Display3DShading = False
End With
sheets("sheet2").CheckBoxes.Add(125, 33, 45, 30).Select
With Selection
      .Value = xlOff
      .LinkedCell = "Sheet1!$A$1"
      .Display3DShading = False
End With

作者: lyt1985 时间: 2007-8-16 18:57

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)