方法一：使用条件格式化（简单标记）
虽然这种方法不能创建真正的“十字架”，但可以利用颜色或边框来突出显示所选单元格。
1. 打开Excel工作表。
2. 点击“开始”选项卡中的“条件格式化”按钮。
3. 选择“新建规则”。
4. 在弹出的窗口中选择“使用公式确定要设置格式的单元格”。
5. 输入以下公式：`=CELL("address")=ADDRESS(ROW(),COLUMN())`
6. 设置你想要的格式，例如填充颜色或添加边框。
7. 确定并应用规则。
这种方法虽然简单，但无法动态地显示十字形标记。
方法二：使用VBA宏实现十字架标记
为了真正实现点击单元格后显示十字架的效果，需要编写一个简单的VBA脚本。
步骤如下：
1. 按 `Alt + F11` 打开VBA编辑器。
2. 在VBA编辑器中，点击“插入”菜单，然后选择“模块”。
3. 将以下代码粘贴到模块中：
```vba
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim CrossShape As Shape
Dim CellAddress As String
' 清除之前绘制的十字架
On Error Resume Next
ActiveSheet.Shapes("Cross").Delete
On Error GoTo 0
' 获取当前选中单元格地址
CellAddress = Target.Address
' 绘制十字架
Set CrossShape = ActiveSheet.Shapes.AddLine( _
ActiveSheet.Range(CellAddress).Left, ActiveSheet.Range(CellAddress).Top + ActiveSheet.Range(CellAddress).Height / 2, _
ActiveSheet.Range(CellAddress).Left + ActiveSheet.Range(CellAddress).Width, ActiveSheet.Range(CellAddress).Top + ActiveSheet.Range(CellAddress).Height / 2)
CrossShape.Name = "Cross"
CrossShape.Line.Weight = 2
Set CrossShape = ActiveSheet.Shapes.AddLine( _
ActiveSheet.Range(CellAddress).Left + ActiveSheet.Range(CellAddress).Width / 2, ActiveSheet.Range(CellAddress).Top, _
ActiveSheet.Range(CellAddress).Left + ActiveSheet.Range(CellAddress).Width / 2, ActiveSheet.Range(CellAddress).Top + ActiveSheet.Range(CellAddress).Height)
CrossShape.Name = "Cross"
CrossShape.Line.Weight = 2
End Sub
```
4. 关闭VBA编辑器并返回Excel。
5. 按 `Alt + F8` 打开宏对话框，选择刚刚创建的宏并运行。
6. 返回Excel工作表，现在每次点击一个单元格时，都会在该单元格周围绘制一个十字架。
注意事项
- 确保启用了宏功能。如果遇到安全警告，请根据提示操作。
- 如果不需要十字架时，可以通过清除形状或禁用宏来移除标记。
- 这种方法适用于需要频繁查看单元格位置的场景，比如教学或演示。
通过上述两种方法，你可以轻松地在Excel中实现点击单元格显示十字架的效果。无论是使用条件格式还是VBA脚本，都能满足不同的需求和场景。
