excel,快速复制插入
来源:百度知道 编辑:UC知道 时间:2024/09/23 09:38:03
把一个表格里面的数据复制,形成两行相同的数据,怎么弄,快捷方法!
例如:
1 2 3 4 5
6 7 8 9 0
q w e r t
f g h j e
改为:
1 2 3 4 5
6 7 8 9 0
q w e r t
f g h j e
急!
改为:
1 2 3 4 5
1 2 3 4 5
6 7 8 9 0
6 7 8 9 0
q w e r t
q w e r t
f g h j e
f g h j e
例如:
1 2 3 4 5
6 7 8 9 0
q w e r t
f g h j e
改为:
1 2 3 4 5
6 7 8 9 0
q w e r t
f g h j e
急!
改为:
1 2 3 4 5
1 2 3 4 5
6 7 8 9 0
6 7 8 9 0
q w e r t
q w e r t
f g h j e
f g h j e
我帮你做
420434418
http://hi.baidu.com/qxj_85/blog/item/e9b527c774ea37139d163d0e.html
复制后挨着放下面,上面后面一列填充1 3 5 7这样的序列,下面复制数据后填充2 4 6 8 这样的序列,然后,按数字这一列排序即可.
CTRL+行号一个一个点
CTRL+2,CTRL+3,CTRL+4
右键插入
选定A1:A7复制
选定A2
右键选择性粘贴,跳过空格,确定!
单纯操作可以考虑排序的方法。
在数据有后面一列序列向下填充,1,2,3,4,5
然后复制包括新列的行,粘贴到数据的后面,再按新列排序。完成后删除新列即可。
公式的方法是:
=OFFSET($A$1,INT((ROW(A1)-1)/2),COLUMN(A1)-1)
向右向下复制。
可以用VBA比较快能达到:
1、假如表为“Sheet1”,在Sheet1名称上点右键-查看代码,就会弹出VBA窗口。
2、把下面这段代码考进去。
Sub charu()
Dim i As Integer
For i = 1 To 100 Step 2
Rows(i & ":" & i).Select
Selection.Copy
Rows(i + 1 & ":" & i + 1).Select
Selection.Insert Shift:=xlDown
Next i
End Sub
这里For i = 1 To 100 Step 2中的“100”你可以根据行数