excel中定位填充方法

excel中定位填充方法

我们在工作中经常需要将空白单元格填充上我们需要的内容的问题，这是一个比较简单的问题，今天看到有个同事是一个一个找到再录入内容的，非常费时费力。

其实在excel中利用定位的功能来填充空白单元格是非常简便的，尤其适用于数据量非常大的数据表格，它的优势显得愈发的明显。

今天，我们以excel2010中一个简单的案例，来进行一下定位填充的方法介绍。

如下图所示的excel表格中，我们需要将空白的各科学生成绩单元格中填写内容"补考"。

一、定位条件法：

点击【开始】选项卡下【查找和替换】/【定位条件】，或者按【F5】/【定位条件】，打开【定位条件】的选项框。

在【定位条件】选项框内，我们看到很多选项，可以根据自己需要进行选择点击

如果需要定位某一项，点击选中即可。

本例中我们需要定位空白单元格，也就是空值。

点击【定位条件】选项框内的【空值】选项，点击【确定】。

excel已经自动将区域内所有的空值给选择起来了。

然后录入文字“”补考“”，然后先按下ctrl键，再按下enter键。

可以看到，在上一步定位的每个空白单元格内都填写上了文字“”补考“”。

是不是很简单？

如果我们要将“”补考“”去掉，在【定位条件】选项中就要选择【常量】

/【文本】，然后按下delete键就可以了。也是比较简单的。

二、还有一种插入vba代码的方法：

点击【开发工具】选项卡下的【visual basic】选项，或者按【alt+F11】组合键，调出vba窗口。点击【视图】/【代码窗口】，就调出了vba代码窗口。

将以下代码录入代码窗口内。

Sub 定位填充()

Dim rng As Range, rn$

On Error Resume Next

For Each rng In Range("b2:f13")

If rng = "" Then rn = rn & rng.Address & ","

Range(Left(rn, Len(rn) - 1)) = "补考"

Next

End Sub

点击vba窗口的运行按钮，如图所示的绿色小三角，就可以看到，表格中空白单元格已经全部填写上“”补考“”。

还可以使用以下两种方法来运行代码：

1.点击【开发工具】选项卡下的【宏】，将宏名【定位填充】选择，然后点击【执行】。

2.点击【插入】/【形状】，选择一种形状，例如我们选择【矩形】，在需要插入形状的单元格区域点击矩形，就插入一个矩形。

右键单击此矩形，点击【指定宏】，选择宏名【定位填充】，然后点击此矩形即可。