excel宏命令5

  • 格式:docx
  • 大小:12.72 KB
  • 文档页数:1

高级宏命令
35 删除空白单元格所在的行:
Sub DeleteBalankRows()
Range("A2:A10").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub
36 让所有表格执行相同命令
Sub 循环执行语句()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Activate
命令内容?
Next
End Sub