什么是导致我的文件保存到我的文档，而不是指定的path？

我是新来的编码（学习在我自己和我去），并有一个小问题，我只是不明白。 我有一段代码已经工作了一段时间，现在似乎无法正常工作。 我创build了一个服务工单，以帮助我们的服务部门保持准确的工作标签。 代码非常简单，用户在所需的单元格中input所有信息。 完成后，他们可以按下一个button，更新一个单独的文件。 按另一个，它将活动工作表的副本保存到指定的联网位置，打印副本，根据指定的单元格保存工作表，然后清除指定的单元格并更新PO＃单元格。

代码运行良好，直到它停止将文件副本保存到指定的目录，我不知道它为什么改变。

Sub SaveWorkOrderByAddress() ChDir "\\BG-PC\SharedDocs\Service work orders\Service work orders" Dim NewFN As Variant Dim stFileName As String 'Save a new copy NewFN = Range("C2").Value & ".xlsx" stFileName = Range("C2").Value & ".xlsx" If Dir(stFileName) <> "" Then MsgBox "File already exists, please rename." Else ActiveSheet.Copy ActiveWorkbook.SaveAs NewFN, FileFormat:=xlOpenXMLWorkbook ActiveWorkbook.Close PrintCurrentWO NextWorkOrderNumber ThisWorkbook.Save End If 

任何帮助将不胜感激，再次我是新的，所以我很抱歉，如果这是一个新的错误。

Answer 1

改变工作目录在这里没有帮助。 调用ActiveWorkbook.SaveAs时，只需将path与文件名相结合即可。

喜欢这个：

 NewFN = "\\BG-PC\SharedDocs\Service work orders\Service work orders\" & Range("C2").Value & ".xlsx"