excel中怎样删除大量不需要的数据

excel中删除大量不需要数据的方法如下：

1、面对数据量大的工作表，超十万多行，如果现在需要将数据表中仓库为废品仓的数据删除。

2、一般 *** 作：筛选数据-选中数据（行）-删除（右击-删除），然后就出现了下图的提示。点击继续，会等待很长时间才能完成 *** 作。

3、为了节省 *** 作时间，只需在对数据删除前加一个 *** 作就可以达到秒删的效果：先对数据表进行排序（按仓库列），后面 *** 作同上一般 *** 作即可。

4、进行排序后产生的效果。

5、此时删除大量数据，就会达到秒删的效果。

用万能的VBA可以解决。

编制代码如下：

Sub 去除重复字符()

Dim I, J, K As Integer

Dim BJ As Integer

Dim s As String

Dim mya(1 To 100)

s = Cells(1, 1)

I = Len(s)

For J = 1 To I

mya(J) = Mid(s, J, 1)

Next J

s = mya(1)

For J = 2 To I

BJ = 0

For K = 1 To J - 1

If mya(J) = mya(K) Then

BJ = 1

Exit For

End If

Next K

If BJ = 0 Then

s = s + mya(J)

End If

Next J

Cells(1, 2) = s

End Sub

---