西西软件园多重安全检测下载网站、值得信赖的软件下载站!
西西首页 电脑软件 安卓软件 电脑游戏 安卓游戏 排行榜 专题合集

Excel自动遍历工具

v1.0 免费版
  • Excel自动遍历工具v1.0 免费版
  • 软件大小:24KB
  • 更新时间:2020-03-10 14:23
  • 软件语言:中文
  • 软件厂商:
  • 软件类别:国产软件 / 免费软件 / 办公软件
  • 软件等级:3级
  • 应用平台:WinAll
  • 官方网站:暂无
  • 应用备案:
好评:50%
坏评:50%

软件介绍

Excel自动遍历工具是一款免费的文件遍历工具,这款软件通过excle宏命令开发,能够自动遍历指定文件夹下的所有文件,可生成超链接直接打开文件,非常的实用!

软件介绍:

写了一个Excel宏命令,可以遍历文件夹下的所有文件,包括文件名、位置、创建日期、修改日期、文件类型、文件大小等信息。

有需要可以在 位置 列生成超链接直接打开文件。

遍历工作表六种方法:

1.Sub 遍历工作表()
For Each sh In Worksheets    '数组
    sh.Select
    Call 设置A1格式
Next
End Sub
--------------------------------------
2.Sub 遍历工作表()
For Each sh In Worksheets    '数组
    if sh.name <> 表名1 and sh.name <>表名 2 then
            sh.Select
            Call 设置A1格式
    end if
Next
End Sub
--------------------------------------
3.Sub 循环工作表()
    For Each sh In Worksheets
        If sh.Index > 2 Then    '限定工作表范围
       sh.Select
              Call 设置A1格式
        End If
    Next
End Sub
--------------------------------------
4.Sub 遍历工作表()
For Each sh In Worksheets    '数组
    If sh.Name Like "*" & "表" & "*" Then     '如果工作表名称包含“表”
        sh.Select
        Call 设置A1格式
    End If
Next
End Sub
5.Sub 遍历工作表()
For Each sh In Worksheets    '数组
    If Not sh.Name Like "*" & "表" & "*" Then     '如果工作表名称不包含“表”
        sh.Select
        Call 设置A1格式
    End If
Next
End Sub
6.Sub 遍历工作表()
For Each sh In Worksheets    '数组
    If sh.Name <> "价格表" And sh.Name <> "人员表" Then    '指定不参与循环的工作表名称,可一个或多个,自行增减
        sh.Select
        Call 设置A1格式
    End If
Next
End Sub

软件截图

Excel自动遍历工具 v1.0 免费版

其他版本下载

发表评论

昵称:
表情: 高兴 可 汗 我不要 害羞 好 下下下 送花 屎 亲亲
TOP
软件下载