Excel表格批量隔行插入N行的方法是什么?
时间:2023-06-22 04:11:48
1,是利用辅助数字行,定位插入或者排序。间接插入
2,vba,执行几行代码就是了,不需要懂代码,复制代码-执行就行
vba代码方法
1、用微软的office或者wps的Excel都行。
微软的自带有,wps的去网上下载vba插件即可
2、举例(wps):在1到10
隔两行插入一行,从第一行开始。
打开该文档,开发工具-vb编辑器
3、插入-模块:
上代码:
Sub 每隔两行插入一行()
Dim i
For i = 1 To Sheet1.Range("a3000").End(3).Row * 3
Rows(i & ":" & i + 0).Select
i = i + 2
Selection.Insert Shift:=xlDown
Next
End Sub
4、点击运行即可。
由于wps不开放此功能,运行时易出现崩溃。但不影响。出错的话再次运行即可。适合数据量比较大的情况。
效果如图:
5、代码解释:For i = 1 中的1是指从第1行插入空白行。Rows(i & ":" & i + 0).Selecti = i + 2其中黑体字的0和2之差是2,意思是隔2行插入..想了解更多vba的话去论坛,比如:http://club.excelhome.net/forum. ... 3&page=1#pid3075178学习一下
间接的方法
1、定位-插入法
如:每个两行插入一行
大家都知道1向下拉是1234..等等,
如果在1上加一个空格再向下拉,会出现: 空 1 空 2 空 3 ...
如果在1上加两个空格再向下拉,会出现: 空空 1 空空 2 空空 3 ...
其他类推。。
如图:
2、之后选中此辅助列,Ctrl+G 定位常量,在被选中的单元格上右键插入1列即可
3、还有一个方法,局限性太大。了解一下即可。
利用数值大小排序而间接的插入
如:每个一行插入一行
在辅助列拖出135..246..
排序-扩展到其他列即可
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
Win11 22H2怎么退回之前版本?Win11回滚Win10系统教程(三种方法)
![](https://img.aspxhome.com/file/2023/27/a239016_0s.jpg)
Windows7磁盘卷标怎么改?
![](https://img.aspxhome.com/file/2023/27/a230542_0s.jpg)
Siri 泄露隐私如何解决?| HomePod 需授权才可访问个人信息
![](https://img.aspxhome.com/file/2023/0/a199810_0s.png)
Win7系统中CS反恐精英online2出现延迟的解决方法如何解决?
![](https://img.aspxhome.com/file/2023/3/a301360_0s.jpg)
WPS学会使用制表符排版
![](https://img.aspxhome.com/file/2023/5/a164285_0s.png)
Win10专业版蓝屏错误rtwlane.sys怎么解决?
![](https://img.aspxhome.com/file/2023/26/a223017_0s.jpg)
wps怎么设置表格升降排序图文教程
Win10合并分区到C盘显示包名称无效怎么办?
![](https://img.aspxhome.com/file/2023/25/a218589_0s.jpg)
Excel 2019打印特定区域的3种方法图解教程
![](https://img.aspxhome.com/file/2023/2/a141052_0s.jpg)
Win10后正式版时代的首个build继承者即将发布?
![](https://img.aspxhome.com/file/2023/28/a248145_0s.jpg)
Win7系统怎么使用注册表修复EXE文件程序
![](https://img.aspxhome.com/file/2023/1/a272926_0s.png)
如何将PPT字母设计霓虹灯效果 PPT字母霓虹灯效果设计实例教程
![](https://img.aspxhome.com/file/2023/10/a352558_0s.jpg)
ppt的幻灯片大小在哪里设置 ppt幻灯片大小设置教程
![](https://img.aspxhome.com/file/2023/30/a270228_0s.png)
苹果 macOS Ventura 13.1 RC 版发布,更新了哪些功能
![](https://img.aspxhome.com/file/2023/6/a201946_0s.jpeg)
wps表格怎样使用函数
wps office设置分数单元格格式?
![](https://img.aspxhome.com/file/2023/1/a167961_0s.gif)
如故app中如何和推荐人聊天 如故app和推荐人聊天的具体方法
![](https://img.aspxhome.com/file/2023/8/a335867_0s.png)
韩博士一键重装系统win10
![](https://img.aspxhome.com/file/2023/2/a284246_0s.png)
经典老牌游戏魔兽争霸3无法在Win8系统上正常运行的解决方法
![](https://img.aspxhome.com/file/2023/29/a254360_0s.jpg)
Excel怎么让单元格形状更具特点?
![](https://img.aspxhome.com/file/2023/5/41865_0s.jpg)