原帖由 liuxuu 于 2014-8-31 21:36 发表
一个VBA就解决了
Sub A()
If Range("A1").Value = Range("B1").Value Then
Range("A1").Select
Selection.ClearContents
Range("B1").Select
Selection.ClearContents
End If
End Sub
欢迎光临 TGFC Lifestyle (http://bbs.tgfcer.com/) | Powered by Discuz! 6.0.0 |