(word完整版)VBA代码汇总(2).docxVIP

  • 174
  • 0
  • 约2.61千字
  • 约 4页
  • 2020-11-19 发布于天津
  • 举报
打开所有隐藏工作表打开所有隐藏工作表循环宏循环代表循环次数执行前把赋值即可不可小于不可大于过滤一行完成标志完成假如名为完成标志的命名单元的值等于完成则退出循环假如一开始就等于完成则只执行一次循环就退出传送参数完成假如某列出现完成内容则退出循环录制宏时调用停止录制工具栏录制宏时调用停止录制工具栏高级筛选列不重复数据至指定表高级筛选列不重复数据至清除的列双击单元执行宏工作表代码关闭宏宏宏宏双击指定区域单元执行宏工作表代码关闭打开隐藏表进入单元执行宏工作表代码以单元格进入代替按钮对象调用宏关闭单元地址

1:打开所有隐藏工作表 Sub 打开所有隐藏工作表 () Dim i As Integer For i = 1 To Sheets.Count Sheets(i).Visible = True Next i End Sub 2:循环宏 Sub循环 () AAA= Range(C2) Dim i As Long Dim times As Long times = AAA times 代表循环次数,执行前把 times 赋值即可 (不可小于 1,不可大于 2147483647) For i = 1 To times Call 过滤一行 If Range(完成标志 ) =完成 Then Exit F

文档评论(0)

1亿VIP精品文档

相关文档