EXCEL 如何制作瀑布图,对于有些数据做图表非常适合用瀑布图，比如生活开支......
VBA代写空白单元格批量录入上方单元格数据
来源：互联网
2023-02-20 18:58:39 116
今天跟大家分享一下如何批量利用vba给空白单元格录入上方非空白数据
工具/原料
- Excel
方法/步骤
如下图A列含有部分空白单元格，现在我们想要批量在空白单元格录入上方非空白单元格数据。
选中A2:A16单元格区域
然后同时按下Alt F11打开vba
点击sheet1，然后在右边区域录入vba代码。
然后点击运行，选择【运行子程序/用户窗体】运行代码程序即可填充空白区域。
完成效果如下图，需要vba代写的朋友可以百度方方格子，最后跟大家分享一下本文这里使用的vba代码，如有需要可以复制粘贴使用。
Sub 空白单元格填充其上方非空值()
Dim r As Range, tmp
Dim cols, rows
Dim i, j
If Selection.Cells.Count = 1 Then
MsgBox "请选中一块区域！"
Exit Sub
End If
If Selection.Areas.Count > 1 Then Exit Sub
rows = Selection.Cells.rows.Count
cols = Selection.Cells.Columns.Count
For j = 1 To cols
tmp = ""
For i = 1 To rows
Set r = Selection.Cells(i, j)
If r.Value = "" Then
r = tmp
Else
tmp = r
End If
Next i
Next j
End Sub
注意事项
- 如有疑问可以点击下方【我有疑问】，与我沟通交流！！
以上方法由办公区教程网编辑摘抄自百度经验可供大家参考！
