㈠ Excel的VBA中,如果某文件夾存在就繼續,文件夾不存在就新建一個再繼續,怎麼寫
'判斷文件是否存在
Function ExistsFile_UseFso(strPath As String) As Boolean
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
ExistsFile_UseFso = fso.FileExists(strPath)
Set fso = Nothing
End Function
'測試
Sub a()
If ExistsFile_UseFso("具體路徑文件（包含文件名的路徑）") Then
'文件存在具體操作
Else
'文件不存在具體操作
End If
End Sub