Excel 删除行或添加行怎么用宏实现

举个例子：

Sub

ts()

Range("a10").Insert

'在A10单元格这个位置插入一整行

Range("a10").EntireRow.Delete

'删除A10单元格这一整行

range("a10:a20").EntireRow.Delete

'删除A10到a20这个区域的行

End

Sub

其它可以自己试试。

Sub 删除表格内容及数据()

Dim S As Long, D As Long

For S = 2 To 4 Step 2

For D = 1 To Range("D65536").End(xlUp).Row

If Cells(D, S) = 0 Then

Cells(D, S).Clear

Cells(D, S - 1).Clear

Else

End If

Next

Next

Sheets(1).Select

Range("a1").Select

End Sub

使用以上代码，

然后创建宏按钮

选择第一个控件，然后指定这个宏就行了。

有用请采纳！

excel中的宏提示，不能去除，但是可以设置信任中心的宏设置，使得宏提醒不在出现。点击文件——选项——信任中心——宏设置，点击启用所有宏，确定以后，再打开带有宏的文件，将直接打开，不再提示。将宏设置为启用所有宏，要对文件加以筛选，以免造成宏中毒。

---