VBA中Dir函式的使用

2022-06-16 12:00:09 字數 675 閱讀 8812

dir 會返回匹配 pathname 的第乙個檔名。若想得到其它匹配 pathname 的檔名,再一次呼叫dir,且不要使用引數。如果已沒有合乎條件的檔案,則 dir 會返回乙個零長度字串 ("")。一旦返回值為零長度字串,並要再次呼叫 dir 時,就必須指定 pathname,否則會產生錯誤。

檔案數確定時,用for迴圈;

檔案數不確定,用do while。

sub

dir使用1()

mypath = thisworkbook.path & "\"

file = dir(mypath & "

*.xlsx*")

debug.print file

for i = 1to3

file = dir

debug.print file

next

end sub

subdir2()

mypath = thisworkbook.path & "\"

file = dir(mypath & "

*.xlsx*")

dowhile file <> ""

debug.print file

file = dir

loop

end sub

vba中dir用法 vba中dir函式使用心得

dir pathname attributes 構建測試環境如下 一 測試在dir函式中使用萬用字元來查詢多個檔案,在vbe中輸入 如下 sub listfiles dim strpath as string,strtmp as string strpath c test strtmp dir st...

VBA之dir函式綜合使用

1.dir函式的有判斷乙個檔案是否存在的功能,也可以使用萬用字元模糊匹配 返回的是該檔案的檔名 sub test dim i as integer for i 1 to 5 if dir d data range a i xls then range b i 無此檔案 else range b i ...

Dir 函式使用詳解

vb dir 函式使用詳解 返回乙個 string,用以表示乙個檔名 目錄名或資料夾名稱,它必須與指定的模式或檔案屬性 或磁碟卷標相匹配。語法 dir pathname attributes dir函式的語法具有以下幾個部分 部分 描述 pathname 可選引數。用來指定檔名的字串表示式,可能包含...