excel - Excel, Active X checkbox "tick" to "cross"?

Question

Is there a way to add cross "X" instead of tick. in a check box. ? please help.

Answer 1

根据 Gary's Student 的建议，我提出了以下 hack：

• 将单元格调整为小方块
• 将其格式化如下：
  • 居中对齐文本（水平和垂直）
  • 上下边框粗深灰色，下边框细浅灰色
• 隐藏工作表中的网格线

• 将以下代码放在带有单元格的工作表模块中：

  Option Explicit
  
  Private mRngOld As Range
  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      Dim rng As Range
      Set rng = Range("B2")
  
      If Application.Intersect(Target, rng) Is Nothing Then
          Set mRngOld = Target
          Exit Sub
      End If
  
      If rng.Value = "X" Then
          rng.Value = "-"
      Else
          rng.Value = "X"
      End If
  
      If Not mRngOld Is Nothing Then mRngOld.Select
  End Sub
  

如果您现在单击单元格（在示例中为），您将在和B2之间切换。X-

这是它的外观：

这是示例工作簿的链接。

Answer 2

您可以使用wingdings 并使用小写的o 和x。一个小写的 o 打印一个打开的盒子。一个小写的 x 打印一个带有 x 的盒子。

Answer 3

很抱歉，Excel 中的 ActiveX 复选框不支持这样的功能。