close

 

語法

Dir [ (pathname, [ attributes ] ) ]

Dir 函數語法具有這些部分：

部分 描述
pathname 選用。 字串運算式 會指定檔案名稱；可能包含目錄或資料夾及磁碟機。 若找不到路徑名稱，系統會傳回零長度字串 ("") 。
屬性 選用。 常數或數值運算式，其總和會指定檔案的屬性。 如果省略，系統會傳回符合路徑名稱的檔案，但不具有任何屬性。

 

Sub Dir_Open_All_Files()
    Dim PathName, FileName As String

    PathName = "C:\Desktop\dir_pratice\"
    FileName = Dir(PathName)

    Do While FileName <> ""
        Workbooks.Open PathName & FileName
        FileName = Dir()
    Loop

End Sub


arrow
arrow
    全站熱搜
    創作者介紹
    創作者 羅傑小沙 的頭像
    羅傑小沙

    羅傑小沙

    羅傑小沙 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄