将文件保存到文件资源管理器中的Onedrive文件夹中

Question

我正在尝试将文件保存到在文件浏览器中同步的Onedrive文件夹中。我需要网络路径才能正常工作吗？这是我到目前为止所拥有的：

Sub Macro4()
Dim myDir, strFilename, strPathname, strDateTime As String
strDateTime = " (" & Format(Now, "hhmm AM/PM") & ")"
myDir = Environ("USERPROFILE") & "\Folder 1\Folder2\Folder3\" & Worksheets("Private").Range("L5").Value
strFilename = Worksheets("HWR DATA - Craft").Range("C1").Value
strPathname = myDir & "\" & strFilename
MyMkDir myDir & "\"

    Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=strPathname & strDateTime & ".xlsm", _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

End Sub

L5指的是包含以下数据的单元格：文件夹A \文件夹B \文件夹C

Answer 1

我发现了问题。问题是我的代码遇到了我的文件夹路径的Microsoft最大长度问题。 （创建到其他文件的链接的限制为256个字符）。