excel - 初始保存时保存名称中的引号？

Question

此代码有效，但是出现了一些奇怪的东西，当我尝试保存文件时，它显示在"Open Order Log - 10-4-12.xlsx"而不是Open Order Log - 10-4-12.xlsx有原因吗？

NewFile = Application.GetSaveAsFilename(InitialFileName:="Open Order Log - " & Format(Date, "dd-mm-yyyy") & ".xlsx")

解决了它：

wbBK2.SaveAs Dir & Application.PathSeparator & "Open Order Report -" & Format(Date, "mm-dd-yyyy") & ".xlsx"

这有点曲折，但它确实有效。

score 1 · Accepted Answer

要删除引号，您必须使用过滤器。

NewFile=Application.GetSaveAsFilename(InitialFileName:="StackOverflow.xlsx", _
             FileFilter:="Excel Files (*.xlsx), *.xlsx")

Mac 的注意事项：
请注意， getsaveasfilename如果用户使用显示箭头导航到文件，则会返回一个不正确的路径。但是，如果改为双击目录节点，则路径将是正确的。

1 回答 1