移动Excel表格指定数据

来源:互联网 发布:mac os x 10.11.6 u盘 编辑:程序博客网 时间:2024/05/17 05:08

移动数据到指定位置,并删除原数据行    
For i = 4 To 255 Step 1        Range("a" & i & ":" & "c" & i).Select        Selection.Cut         Range("K" & (i - 1) & ":" & "M" & (i - 1)).Select        ActiveSheet.Paste    Rows(i & ":" & i).Select    Selection.Delete Shift:=xlUp    Next



原创粉丝点击