养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

excel中如何用VBA快速填充空白行

时间:2024-09-20 17:01:14

本经验介绍excel中如何腩柽鬣盛用VBA快速填充空白行,大家在使用excel的时候,经常会遇到某列的值中,有某一些连续行是相同的,所以省略输入,导致出现很多空白行,由于数据统计需要进行罗嵯脶姥空白行的填充,普通方式速度会很慢,现在介绍一种使用VBA快速填充的方法。

工具/原料

电脑

Excel软件

方法/步骤

1、现在,我们以图片中的数据为例,大家可以看到图片中第2两列中存在空白行,这一部分的数据应当与空白处最上面的非空单元格数据一致,如图所示;

excel中如何用VBA快速填充空白行

2、接下来,我们使用VBA进行空白行的填充,首先在工作表名称上点击右键,在弹出的菜单中选择“查看代码”,如图所示;

excel中如何用VBA快速填充空白行

3、然后,会出现代码编辑窗口,即VBA编辑窗口,如图所示;

excel中如何用VBA快速填充空白行

4、我们螅岔出礤在窗口中,新建一个函数,名称随意起名即可,并输入函数过程;Sub填充数据()Fori=2To23IfCells(i,1).Value="&鳎溻趄酃quot;ThenCells(i,1).Value=Cells(i-1,1).ValueIfCells(i,2).Value=""ThenCells(i,2).Value=Cells(i-1,2).ValueNextiMsgBox"填充完成!"EndSub函数cells(x,y)中的x=行数,y=列数,可以根据实际情况进行调整,如图所示;

excel中如何用VBA快速填充空白行

5、然后,点击图中箭头指向的绿色按钮,运行VBA函数,如图所示;

excel中如何用VBA快速填充空白行

6、运行结束后,数据会自动填充完成,我们的工作也就完成了,如图所示;

excel中如何用VBA快速填充空白行

© 一点知识