西西軟件園多重安全檢測(cè)下載網(wǎng)站、值得信賴的軟件下載站!
西西首頁(yè) 電腦軟件 安卓軟件 電腦游戲 安卓游戲 排行榜 專題合集

Excel自動(dòng)遍歷工具

v1.0 免費(fèi)版
  • Excel自動(dòng)遍歷工具v1.0 免費(fèi)版
  • 軟件大小:24KB
  • 更新時(shí)間:2020-03-10 14:23
  • 軟件語(yǔ)言:中文
  • 軟件廠商:
  • 軟件類別:國(guó)產(chǎn)軟件 / 免費(fèi)軟件 / 辦公軟件
  • 軟件等級(jí):3級(jí)
  • 應(yīng)用平臺(tái):WinAll
  • 官方網(wǎng)站:暫無(wú)
  • 應(yīng)用備案:
好評(píng):50%
壞評(píng):50%

軟件介紹

Excel自動(dòng)遍歷工具是一款免費(fèi)的文件遍歷工具,這款軟件通過(guò)excle宏命令開發(fā),能夠自動(dòng)遍歷指定文件夾下的所有文件,可生成超鏈接直接打開文件,非常的實(shí)用!

軟件介紹:

寫了一個(gè)Excel宏命令,可以遍歷文件夾下的所有文件,包括文件名、位置、創(chuàng)建日期、修改日期、文件類型、文件大小等信息。

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

遍歷工作表六種方法:

1.Sub 遍歷工作表()
For Each sh In Worksheets    '數(shù)組
    sh.Select
    Call 設(shè)置A1格式
Next
End Sub
--------------------------------------
2.Sub 遍歷工作表()
For Each sh In Worksheets    '數(shù)組
    if sh.name <> 表名1 and sh.name <>表名 2 then
            sh.Select
            Call 設(shè)置A1格式
    end if
Next
End Sub
--------------------------------------
3.Sub 循環(huán)工作表()
    For Each sh In Worksheets
        If sh.Index > 2 Then    '限定工作表范圍
       sh.Select
              Call 設(shè)置A1格式
        End If
    Next
End Sub
--------------------------------------
4.Sub 遍歷工作表()
For Each sh In Worksheets    '數(shù)組
    If sh.Name Like "*" & "表" & "*" Then     '如果工作表名稱包含“表”
        sh.Select
        Call 設(shè)置A1格式
    End If
Next
End Sub
5.Sub 遍歷工作表()
For Each sh In Worksheets    '數(shù)組
    If Not sh.Name Like "*" & "表" & "*" Then     '如果工作表名稱不包含“表”
        sh.Select
        Call 設(shè)置A1格式
    End If
Next
End Sub
6.Sub 遍歷工作表()
For Each sh In Worksheets    '數(shù)組
    If sh.Name <> "價(jià)格表" And sh.Name <> "人員表" Then    '指定不參與循環(huán)的工作表名稱,可一個(gè)或多個(gè),自行增減
        sh.Select
        Call 設(shè)置A1格式
    End If
Next
End Sub

其他版本下載

發(fā)表評(píng)論

昵稱:
表情: 高興 可 汗 我不要 害羞 好 下下下 送花 屎 親親
查看所有(0)條評(píng)論 > 字?jǐn)?shù): 0/500

TOP
軟件下載