用宏很简单
ALT+F11打开VBA编辑器,输入
Private Sub Worksheet_Change(ByVal Target As Range)
col = Target.Column
bbb = Trim(Target.Value)
If col = 2 Then 'b列
Application.EnableEvents = False
'A列有效行数
rowsOfColumnA = ActiveSheet.UsedRange.Rows.Count
For i = 1 To rowsOfColumnA
aaa = Trim(Cells(i, 1))
If aaa = bbb Then
Cells(i, 1) = ""
End If
Next
Application.EnableEvents = True
End If
End Sub
宏安全级别设低,保存,重新打开表格,选择允许运行宏,即可
不会。这个。
如果B列输入b 下次不能再输入b 还有可能。