发布网友 发布时间:2024-10-24 00:24
共3个回答
热心网友 时间:2024-10-28 00:16
1. 按Alt + F11,双击Sheet1,输入以下代码:
Sub 反选()
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Dim raddress As String, taddress As String
raddress = Selection.Address
taddress = ActiveSheet.UsedRange.Address
With Sheets.Add
.Range(taddress) = 0
.Range(raddress) = "=0"
raddress = .Range(taddress).SpecialCells(xlCellTypeConstants, 1).Address
.Delete
End With
ActiveSheet.Range(raddress).Select
Application.ScreenUpdating = True
End Sub
2. 返回Excel数据表,按Ctrl + F ,输入“?????*”,点击查找全部,然后全选找到的地址,关闭查找对话框。
3. 最后,按Alt + F8,运行“反选”宏,按Del键删除 BCN136 和 BCN136E以外的单元格。
热心网友 时间:2024-10-28 00:14
假如数据在AB两列,在你数据右侧第一行中输入公式:
=IF(AND(LEFT(A1,6)=LEFT(B1,6),MID(A1,7,1)<>MID(B1,7,1)),"配对","不配对")
下拉公式,对此列排序,删除不配对的行即可。
热心网友 时间:2024-10-28 00:19
筛选 包含 BCN136 或 BCN136E的出来,复制到新表