求教大家帮忙解决个问题，excel的 我现在这个数据要填充 怎么样能快速的把这一列的数据都填充好， 谢谢了

VBA或者是用辅助列+公式

VBA的话 我是闭目鱼 给的代码就行，不过那个代码少了句 end if 吧这句加到 next 上边就行了（那个代码是填充A列的，如果你的数据在B列则将[a65536]改为[b65536]）

公式的话需要添加个辅助列
假设你的数据咋A列，那就先在B1中手动输入A1的内容，然后在B2中输入公式并下拉即可
B2中公式：=IF(A2="",B1,A2)

比如你的原数据在A列，数据从A2开始，可在B2输入公式：
=IF(A3="",B1,A3)
公式向下拉填充复制就可以实现。

以前上学的时候做数据库就要这样填充，师兄做了一个VBA的工具，设置成专门的按钮，但是我不记得了，这是搜到的，这个你试试先
Sub 填充()
For i = 2 To [a65536].End(xlUp).Row
If Range("a" & i) = "" Then Range("a" & i) = Range("a" & i - 1)
Next
End Sub

1. 添加辅助列，比如你的是在A列，并且A1=0.1548，则在B列的B1=0.1548, 然后在B2填入下面的公式：if(A2="",B1,A2),
2. 然后从B2单元格往下拖来复制公司，这样就会在B列出现你右图出现的结果。
3. 然后你Copy/Paste B列时候，用选择性粘贴，只要"值"就可以了。

我不会用VBA，就像楼上说的，加辅助列：
若你的原数据在A列，加BC两列,B列就1，2，3，1，2，3，这么拖下来，C列做公式
C3=IF(B3=1,A3,C2)
拖下来，再复制回去，OK

你会不会用VBA，如果会用VBA很方便
数据是每一列都有还是固定列？在一个表还是多个表？？