Sub Test_Run() MkDir "C:\ST\temp\AM" End Sub
我尝试在现有目录C：\ST\temp中创建新文件夹（AM）。但它导致错误，显示消息：参数不是可选的
dw1jzc5e1#
您的MkDir函数需要两个参数，而您只发送了一个。而不是打电话标记目录"C：\ST\温度\AM"将其更改为：标记目录"C：\ST\温度"，"AM"应该会有用的。
Function MkDir(strDir As String, strPath As String) Dim FSO As New FileSystemObject Dim path As String path = strPath & strDir If Not FSO.FolderExists(path) Then FSO.CreateFolder path End If End Function
1条答案
按热度按时间dw1jzc5e1#
您的MkDir函数需要两个参数，而您只发送了一个。
而不是打电话
标记目录"C：\ST\温度\AM"
将其更改为：
标记目录"C：\ST\温度"，"AM"
应该会有用的。