excel宏，判断两个单元格内容一至的VBA怎么写？

如题所述

Public Sub aaa()
Dim iRng As Range: Set iRng = Range("B" & Selection.Row)
If iRng.Value <> iRng.Offset(-1, 0).Value Then
MsgBox "不相同！"
Exit Sub
Else
MsgBox "相同！"
End If
End Sub

----------
如果想加入其他动作，可以将“不相同”和“相同”的两个msgbox换成需要的动作

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/7fs4m2sfff22m4vf8p.html