保存excel文件时,我得到应用程序定义或对象定义错误。我得到一个错误:“wbk.SaveAs FPath”
这是我的代码:
Dim wbk As Workbook, FPath As String
Set wbk = Workbooks.Open("\\network\drive\Template.xlsm", False, ReadOnly:=True, IgnoreReadOnlyRecommended:=True)
FPath = "\\network\drive\Saved_Files\" & _
"File Number - " & ThisWorkbook.Worksheets("Sheet1").Range("A1").Value & ".xlsm"
With Worksheets("Sheet1")
.Range("A2").Value = Test....
End With
***wbk.SaveAs FPath***
wbk.Close True
Set wbk = Nothing
答案 0 :(得分:-1)
前几天我遇到了这个问题,你无法保存到像这样的网络驱动器。它必须映射为驱动器号才能工作。
至少我无法找到解决方法,同时修补它。 Excel似乎不喜欢网络驱动器作为路径名。
已编辑:蒂姆是对的,我上面提到的问题是需要微软热修复的问题。不应该在所有机器上。
也许这个链接可能会有所帮助,但它们描述的是同一类型的问题。看到第一条评论,很多人似乎都对内部的代码取得了成功。
http://www.dailydoseofexcel.com/archives/2006/06/21/unc-path/