🚀 在日常工作中,我们常常需要处理大量的数据,有时会遇到一些空白单元格,这无疑增加了我们的工作负担。今天,我们就来分享一个使用VBA(Visual Basic for Applications)的小技巧,帮助大家快速自动填充空白单元格上一行的内容。
💡 首先,打开Excel,按 `Alt + F11` 打开VBA编辑器。然后,在插入模块中编写以下代码:
```vba
Sub FillBlankCells()
Dim rng As Range
Set rng = ActiveSheet.UsedRange
For Each cell In rng
If cell.Value = "" Then
cell.Value = cell.Offset(-1, 0).Value
End If
Next cell
End Sub
```
🔧 将上述代码粘贴到模块中后,关闭VBA编辑器。接下来,只需返回Excel并按 `Alt + F8` 调用宏管理器,选择刚才创建的 `FillBlankCells` 宏运行即可。这样,所有空白单元格就会被其上方单元格的内容所填充,大大节省了手动填充的时间和精力!
🎉 使用这个小技巧,可以显著提高工作效率,让你有更多时间专注于更有价值的工作!