发布网友 发布时间:2022-02-25 07:24
共10个回答
懂视网 时间:2022-02-25 11:45
excel批量插行或列的方法:
1.先打开已创建好的excel表格,点击鼠标左键选中1到5行单元格
2.然后点击鼠标右键,选择菜单栏中的插入
3.这样我们就成功的插入空白行
总结
1.打开excel表格,点击鼠标左击选中
2.点击鼠标右键,选择菜单栏中的插入
3.完成插入
热心网友 时间:2022-02-25 08:53
方法很多,给你个用公式解决的方法
比方说,数据在B1到F1000,共1000行
第一步、在其后的空闲列,比方说G列的G1中输入公式=IF((MOD(ROW(),4)=1)+(MOD(ROW(),4)=2),1,0) 然后把公式拖拽覆盖到最后一行,这样就 添加了一个辅助列;
第二步,在H1中输入公式=IF($G1=0,"",INDIRECT(ADDRESS(COUNTIF($G$1:$G1,1),COLUMN(B1)))),把公式向右拖拽到L列(与原记录列数相同),再同时选中H1至L1区域,向下拖拽覆盖到末行,就O了。
当然,只用用一个复杂些的数组嵌套公式,就可以搞定,不想费脑筋啦,哈哈
下图是你要的结果吧
热心网友 时间:2022-02-25 10:28
右边空白列写一序列号,复制后向下粘贴两次,然后选中全表格,按此列升序排序。
热心网友 时间:2022-02-25 12:19
添加序号列 讲序号列序号部分在现有数据末尾复制两次,按序号排序
热心网友 时间:2022-02-25 14:27
鼠标放在工作表标签,右键,查看代码,将下列代码粘贴进去
Sub 插空行()
Dim i As Integer
For i = 3 To 400 Step 4
Rows(i).Insert
Rows(i).Insert
Next i
End Sub
关闭VB窗口,ALT+F8,运行插空行宏。
热心网友 时间:2022-02-25 16:52
=========================================================================
按Alt+F11,输入以下代码:
Sub 隔行插入()
Application.ScreenUpdating = False
Dim i%, j%, x%, y%
x = 2 '间隔行数 (要每隔2行插入,设置x=2)
y = 2 '插入行数 (要插入2行,设置y=2)
With ActiveSheet
For i = 1 To y
For j = 1 To .[A65536].End(xlUp).Row + Int(.[A65536].End(xlUp).Row / (x + i - 1))
If j Mod (i + x) = 0 Then .Rows(j).Insert
Next j
Next i
End With
Application.ScreenUpdating = True
End Sub
最后按Alt+F8,运行该宏便可。
热心网友 时间:2022-02-25 19:33
可以这样操作:
1、插入1列(假设在A列),输入序号1、2、3、4.....(原数据有多少行就输入多少)
2、复制这列序号,两次粘贴在它的下面(假设原数据100行,序号列变成:1、2、3....99、100、1、2、3.....99、100、1、2、3....99、100)
3、按序列升序排序。
4、再插入1列,输入公式=mod(A2,2) 向下填充公式。
5、筛选原数据的空行,把上一步显示1的行删除。
热心网友 时间:2022-02-25 22:31
以Excel2010为例(其他版本类同):
首先使用辅助列根据实际情况建立一个序号(例如:下图中是批量在每行中间插入一行空格,因此序号是先奇数后偶数)。
使用Excel的排序(或筛选)功能按照升序重新排序即可(结果如图)。
热心网友 时间:2022-02-26 01:46
有个简单的方法。HI我,发你表。再给你说。说起来麻烦,做起来很简单。
热心网友 时间:2022-02-26 05:17
E侠兔的方法好!