怎样用vba自动填充excel某列为空白处的数据为上一个单元格的数据？
怎样用vba自动填充excel某列为空白处的数据为上一个单元格的数据？
里面的空白处太多，用手工拉，或者编辑--向下填充的话工作量太大
[解决办法]
用二重循环，外面的循环行，里面的循环列（不过这要根据你填充数据的方式，比如你希望将空单元格填充为同一行，前一列的数据）。在循环体中
if 当前单元格为空 then
当前单元 = 同一行前一列的单元格值
[解决办法]
恐怕还得加入一点人为指定吧，简单地循环所有单元格，势必有些本不应有数据的单元格也会被错填上数据。
楼主说得太模糊，让人无法明确判断。
[解决办法]
可以获得用户工作区，循环用户区的所有单元格既可 好像是useRange
[解决办法]
没有装excel简单写了一下楼主自己完善。
Sub ttt()
Dim reg As Range
Set reg = ActiveSheet.UsedRange.SpecialCells(xlCellTypeBlanks)
For Each nx In reg
nx.Value = nx.Offset(-1).Value
Next
End Sub
[解决办法]
学习ing：
Dim reg As Range
Set reg = ActiveSheet.UsedRange.SpecialCells(xlCellTypeBlanks)
For Each nx In reg
nx.Value = nx.Offset(-1).Value
Next
[解决办法]
up.
学习。
