发布网友 发布时间:2022-04-22 22:34
共5个回答
热心网友 时间:2023-08-02 05:34
鼠标移至工作表标签处,右键,查看代码,将下列代码复制进去
Sub XX()
For i = 1 To sheets(1).range("A65536").end(xlup).row Step 2
Rows(i).Insert
Next
End Sub
关闭VB窗口,ALT+F8,运行XX宏
热心网友 时间:2023-08-02 05:34
楼主,这个你可以录制一个宏来实现,非常简单,
热心网友 时间:2023-08-02 05:34
选中要添加的那一行,直接点击添加按钮
热心网友 时间:2023-08-02 05:35
用VBA吧,两行代码!
热心网友 时间:2023-08-02 05:36
右键插入单元格