Visual Basic：与 Excel 工作表保存在同一文件夹中

Question

我对 VB 很陌生，所以这可能很容易。我正在从 Excel 电子表格创建 Word 文档，并希望将 Word 文档保存在与电子表格相同的文件夹位置。

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

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

我还制作了一个消息弹出窗口来显示 ThisWorkbook.Path，它提供了电子表格路径，所以我知道这是对的！

我也认为我没有正确命名，因为我希望将其命名为单元格 C8 中的文本。但它实际上是添加了 C8 中文本的“文档”文件夹名称。

提前致谢。

Answer 1

激活即时窗口 (Ctrl+G) 并将这一行添加到您的代码中：

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

你会看到你的路径是否正确。特别是，如果文件夹路径和文件名之间有“\”。