求助，Excel2003代码问题，非常感谢！

Question

如题所述

Answer 1

问题，非常感谢

Answer 2

试试以下代码

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row > 4 And Target.Row < 11 And Target.Column = 1 Then
If [h13] = "前" Then [h5] = Target
If [c8] = "后" Then [i5] = Target
End If
End Sub

追问

非常感谢老师，代码非常好用，只是我的提问有错误，才发现，就是显示“后”的不是在C8，还是在H13里，显示“前”和“后”都是在H13里，我把C8修改成H13了也好用，只是这样不知道能否在简化一些，老师您有时间再帮我看看，拜托了！

追答

现在无法提交了答案了
这已经是较简单的。

本回答被提问者和网友采纳