㈠ 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