Visual Basic：保存在与Excel Sheet相同的文件夹中

Question

我对VB很新，所以这可能是一个非常简单的。我正在从Excel电子表格创建Word文档，并希望Word文档保存在与电子表格相同的文件夹位置。

我正在使用代码： .SaveAs Filename:=ThisWorkbook.Path & Range("C8").Text & ".docx" 虽然我会工作，但它会将其保存在该位置的目录中。

即。电子表格位于C:/User/Documents/MySpreadsheet。但Word文档将保存在C:/User/Documents。

我还制作了一条消息弹出窗口，显示ThisWorkbook.Path，其中提供了电子表格路径，所以我知道这是正确的！

我也不认为我已经完成了命名权，因为我希望它被命名为单元格C8中的文本。但它实际上是'Documents'文件夹名称，其中添加了C8中的文本。

提前致谢。

Answer 1

激活立即窗口（Ctrl + G）并将此行添加到您的代码中：

debug.print ThisWorkbook.Path & Range("C8").Text & ".docx"

您将看到您的路径是否正确。特别是，如果你有＆＃34; \＆＃34;文件夹路径和文件名之间。