无法执行宏-找不到错误“ 76”路径

时间:2018-11-15 03:32:42

标签: excel vba excel-vba

我对VB宏不是很熟悉。我不断得到

  找不到

错误'76'路径。

下面是代码示例。关键是我们有一个带有宏的文件,该文件将坐在同步的OneDrive位置上。不幸的是,OneDrive的位置取决于用户的个人资料。我尝试了%username%,但除非输入正确的用户名,否则它不会起作用。这不是我想要的,因为多个用户将在各自的OneDrive位置中使用启用了宏的文件。有什么想法吗?

Sub Export_XML()

    Dim r As Range
    Dim output As String

    For Each r In Range("XML_Output").Rows
        output = output & r.Value & vbNewLine
    Next r

    Open "C:\Users\%username%\Brand Developers Limited\Media Scheduling - 9. SpreeTV\Spree.xml" For Output As #1
    Print #1, output
    Close

    MsgBox "Spree schedule export complete"

End Sub

1 个答案:

答案 0 :(得分:0)

这种方式:

Open "C:\Users\" & environ("username") & "\Brand Developers Limited\Media Scheduling - 9. SpreeTV\Spree.xml" For Output As #1