我有一张 Excel 表，其中有几千行类似以下内容：
A1 B1
9-1 苹果
9-2 菠萝
10-1 葡萄
10-2 橙色
10-3 梨
11-1 柠檬
是否有 VBA 脚本可以删除数字后面包含除“-1”之外的任何内容的行？因此结果应如下所示：
A1 B1
9-1 苹果
10-1 葡萄
11-1 柠檬
每个第一位数字的变化数量各不相同。有时可能只有 1 个，有时则最多有 8 个或 9 个。只需保留每行的“-1”并删除其余部分即可。
提前谢谢了。
答案1
这是一个快速而肮脏的方法来做到这一点：
在 C1（或第一个可用列）中输入公式
=FIND(-1,A1)。双击或拖动单元格手柄将公式一直复制到所有行。现在包含的单元格-1应该有一个数字，其他单元格应该显示#VALUE!。选择整个 C 列并按Ctrl+ F。单击
Options。在 中输入#value!并将框Find what更改Look in:为Values并点击Find All。然后按Ctrl+ A，右键单击其中一个突出显示的单元格，选择Delete，更改为Entire row并点击OK。