VBA中Dir函式的使用

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 可選引數。用來指定檔名的字串表示式，可能包含...