怎么让空格复制上一格的内容啊？！！

灰灰凯凯

aa.zip (113.67 KB, 下载次数: 88)

2012-7-3 20:30 上传

点击文件名下载附件

要把北京广州下面的空格都和上面一样。
定位不行，试了好多方法都不行


该贴已经同步到 灰灰凯凯的微博

wajour

你的单元格有个空格
先用查找替换将空格去掉就可以了

wajour

1. Sub 从上往下复制()
   
2. For Each cell In Selection
   
3. If Len(cell.Value) < 2 Then
   
4. cell.Value = cell.Offset(-1, 0)
   
5. End If
   
6. Next
   
7. End Sub

复制代码

运行时先选中区域

wajour

或者用这个
可以保留公式格式

1. Sub 从上往下复制()
   
2. For Each cell In Selection
   
3. If Len(cell.Value) < 2 Then
   
4. cell.FormulaR1C1 = "=R[-1]C"
   
5. End If
   
6. Next
   
7. End Sub

复制代码

杨小军

              Sub abc() For Each cell In Selection
  If Len(cell.Value) < 2 Then
cell.Value = cell.Offset(-1, 0)
End If
Next
End Sub
管用！

dycfq

ctrl+‘’　　　　　　　　　　　　　　　　

yanding123

首先在表格中选择数据-筛选-自动筛选，筛选出J列所有空白的单元格，在J3位置输入 =J2 回车，复制J3，粘贴到下面所有空白处即可。

mhb315

你的表中并不是空值所以无法定位，你注意看下其实是有个空格的，可以复制粘贴“替换”成空值，然后再进行定位、空值、=↑ 、ctrl+enter 即可

粤-物业-梦想

不会，顶一个。