办公软件分享：应用篇 假空变真空

最近工作比较忙，也就没时间去做更多的分享了，后期我们会继续分享函数。今天我们在这里介绍一种比较小众的情况，假空和真空。

我们首先说说真空，其实在excel表里面，空白单元格就是真空，不过这里需要注意的一点是，部分excel虽然单元格看起来是空白的，但是他是一种假空状态，这种状态很少见，一般都是由不成熟的系统产出的数据源表上自带的。

左边的数据区域CTRL+G，定位空值是定位不出来的，右边的数据区域是可以定位的，这就分别代表了假空、真空两种状态。

实际更多的是需要解决问题，如何把假空区域变成真空区域，有人说手动删除掉假空、然后在插入空白行或者列，这是可以的，这只能解决数据量很少的情况，数据量多的话太费时间。

那么解决这种情况最好的办法是VBA，

VBA编程是Excel里面比较高端的运用了，旨在把批量重复的，人力不易完成的工作交给机器来完成，当然还有其他的一些功能，我们以后再介绍。

这里的话，包括以后，会把各种功能，成熟的代码发出来，但是编程语言就不教了，这个有兴趣的朋友需要专业的学习。

首先我们需要知道EXCEL代码的情况，低版本是没办法用VBA的，WPS也无法用代码。

假空变真空代码是

?Private Sub CommandButton1_Click()

Dim c As Range, UnRng As Range

With UsedRange

Set c = .Find(“”, LookIn:=xlValues, lookat:=1)

If Not c Is Nothing Then

firstAddress = c.Address

Do

If UnRng Is Nothing Then

Set UnRng = c

Else

Set UnRng = Union(UnRng, c)

End If

Set c = .FindNext(c)

Loop While Not c Is Nothing And c.Address <> firstAddress

End If

End With

If Not UnRng Is Nothing Then

UnRng.ClearContents

End If

End Sub

?