在d出的录制对话框里选择确定,可以在设置快捷键里输入一个"q",===注意是小写的
然后直接在d出的宏录制窗口里点停止(就是小方块图案)
然后再选择工具-宏-VISUAL
BASIC
编辑器,点击
在模块1里有刚才录制的宏的代码里边只有注释语句将下面代码粘贴进去粘到SUB
MACRO1()和END
SUB之间
Dim
i
As
Integer
For
i
=
1
To
19
Step
2
这里的19你可以随便改成你需要的数字
Rows(i)Select
SelectionClearContents
Next
i
然后关闭编辑器,在EXCEL里按快捷键(CTRL+q)就可以了①选中A列---右键---插入
②A2输入1---选中A1:A2区域向下填充 (填充后奇数行都是空值,偶数行都是数字)
③选中A列---编辑---定位---定位条件---空值---确定---鼠标指向选中的任一单元格---右键---删除---整行---取得
④选中A列---右键---删除
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)