技巧：在电子表格中批量间隔插入行_第1页
技巧：在电子表格中批量间隔插入行_第2页
技巧：在电子表格中批量间隔插入行_第3页
技巧：在电子表格中批量间隔插入行_第4页
技巧：在电子表格中批量间隔插入行_第5页
已阅读5页，还剩1页未读， 继续免费阅读

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1、技巧：在电子表格中批量间隔插入行有时为了印发学生成绩条或工资条，需要在电子表格中加入空行；你是否用人工逐一插入呢？那样，少则几十行，多则上百行，累死人了不？如果这样做，你OUT了！下面，请看绝招：在此，就电子表格中如何批量间隔插入行，作一说明。电子表格批量插入行：alt+ F11（按此两键，打开插入模块）或者从菜单进入：工具宏Visual Basic编辑器在出现的下面窗口中将下列代码粘贴进去:Sub 宏1()For i = 1 To 50Selection.EntireRow.InsertActiveCell.Offset(2, 0).Range("A1").SelectN

2、ext iEnd Sub把50改成你实际需要插入的数据的行数然后鼠标选定第一行数据任意单元格，选择菜单：工具-宏-运行宏，选择刚才的宏1，执行出现的是下面的样式，插入的是空行：如果要做工资条，假设第一行是表头，即为你要复制的内容，那么代码如下，注意需要选择第三行第一单元格（A3），执行宏，否则可能出错Sub 宏1()For i = 1 To 50Selection.EntireRow.InsertRows("1:1").Copy'（复制第一行数据，所以执行宏的时候必须选择的是某行的开始单元格否则会粘贴出错）ActiveSheet.PasteActiveCell.Offset(2, 0).Range("A1").SelectNext iEnd Sub选中，执行即可这时出现的是样式如

人人文库> 全部分类> 教育资料 > 辅导培训

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论