返回目录:excel表格制作
可以做到,参照我下面的例子
比如给下图中的所有12下面添加一行12
第一步,复插入辅助列
第二步,选中G列数据区域,下移一格粘贴至辅助列
第三步,选中辅助列,查找全部12,在查找结果制处CTRL+A全选查找结果
第四步,关闭查找对话框,在其中一个被选中的单元格上点右键-插入-整行
第五步,删除辅助列
第六步,选中G列数据区域,按F5打开定位条件,选择空值
第七部,点击确定,按等号,按上方向键,按ctrl+回车
操作zd完成,所有的12下面都加了一个12
你在要插入的行以下选中多少行,点插入,就能插入多少行。
假定指定内容为ABC001,方copy法如下:
1、按CTRL+F调出查找功能对话框,在“查找内容”处输入百ABC001,按“查找全部”,定位度到ABC001单元格。
2、按HOME键让光知标回到同行第一列,按下箭头,在左侧“行号”处点鼠标右道键——“插入”。
下图有五行数据,现在,要做的就是,在每两行(有数据)之间,分别都插入一空行。
实现的方法非常简单,但是请务必遵循如下操作,否则将前功尽弃。
首先,按下键盘上的CTRL键,按下就别松开,之后,使用鼠标左键去点击每一行的行标(即显e799bee5baa6e79fa5e98193e58685e5aeb9336示1、2、3、4、5……的最左边的那些按钮)。
注意哦,上述必须在按住CTRL键的时候使用左键去点选。想在哪行的前面插入空行,就选择哪一行。
选择好了之后,务必保持行的被选中状态,之后,在选中区域的任何一个地方,点击右键,在弹出的快捷菜单中选择“插入”命令。
就这样,极其简单,我们就在每行的上面,都插入了一个空行了。就是效果。
上述的方法适合于行数比较少的表,如果行数多,得使用其它操作方法。
下面提供VBA隔行插入空行的代码:
Dim a As Integer
Dim b As Integer
a = WorksheetFunction.CountA(Range("a:a"))
b = 2
For x = 1 To a
Rows(b & ":" & b).Select
Selection.Insert Shift:=xlDown
b = b + 2
Next将如上代码作为宏,在Excel中运行即可。