求助！如何填充

像现在这样的数据，二十多万条，黑色为原始数据，红色为填充数据，如何对应填充，有什么比较快的函数或程序吗？请求大神帮忙，万分感谢

加Q:1064304844

不感兴趣

开通SVIP免广告

CTRL+G 定位空值，再=上一个单元格

Sub tc()
For i = 1 To 20 '20可以修改为你所需要填充的行数，比方20万，就修改为20万
If Cells(i + 1, 1) = "" Then
Cells(i + 1, 1) = Cells(i, 1)
End If
Next i
End Sub

下载贴吧APP
看高清直播、视频！

分享到: