控件工具箱中的复选框能不打印吗？

黑桃K · 发表于 2011-5-27 18:20

√保留，只是不打印边框。

[ 本帖最后由黑桃K 于 2011-5-28 01:04 编辑 ]

LangQueS · 发表于 2011-5-27 18:26

可以

[ 本帖最后由 LangQueS 于 2011-5-27 18:28 编辑 ]

黑桃K · 发表于 2011-5-27 18:36

但是√不能打印

LangQueS · 发表于 2011-5-27 20:16

其他方法：

黑桃K · 发表于 2011-5-27 20:58

请问楼上是用什么做的？

LangQueS · 发表于 2011-5-27 21:24

原帖由 黑桃K 于 2011-5-27 20:58 发表
请问楼上是用什么做的？

以下是工作表中的代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.Intersect(Target, [B2:B20]) Is Nothing Then Exit Sub
If Target.Count > 1 Then Exit Sub
      If Target = "√" Then
         Target = ""
      Else
         Target = "√"
      End If
End Sub

黑桃K · 发表于 2011-5-27 21:51

放到任何工作表都可以吗？

LangQueS · 发表于 2011-5-27 21:55

原帖由 黑桃K 于 2011-5-27 21:51 发表
放到任何工作表都可以吗？

都可以

LangQueS · 发表于 2011-5-27 21:56

可以用在所有工作表的任何位置。

黑桃K · 发表于 2011-5-27 21:57

合并单元格好使不

		自动登录	找回密码
密码			免费注册

[已解决] 控件工具箱中的复选框能不打印吗？