如何在 Excel 中打开包含当前工作簿的文件夹？

在使用 Excel 时，有许多场景下快速访问包含工作簿的文件夹可以提高工作效率。无论您是在进行故障排查、整理文件，还是简单地管理相关文档，能够轻松从 Excel 内部打开文件夹都非常有用。本文将探讨几种实现这一目标的方法。

打开包含当前工作簿的文件夹

• 通过使用公式
• 通过使用 Kutools for Excel
• 通过使用 VBA 代码

通过公式打开包含当前工作簿的文件夹

使用公式打开 Excel 中当前工作簿所在的文件夹是一种实用且高效的解决方案，无需使用宏。通过利用 CELL 函数以及 LEFT、FIND 和 SUBSTITUTE 等字符串操作函数，您可以创建一个动态超链接，简化文件导航。

1. 只需将公式复制并粘贴到工作簿中的任意单元格中，该公式会创建一个可点击的链接，指向当前工作簿的文件路径。

=HYPERLINK("file:///" & SUBSTITUTE(LEFT(CELL("filename", A1), FIND("[", CELL("filename", A1)) - 1), "\", "/"), "Open Containing Folder")

2. 现在，您可以单击超链接以跳转到当前工作簿的文件路径。

使用 Kutools for Excel 打开包含当前工作簿的文件夹

Kutools for Excel 的“打开当前文档所在文件夹”工具通过一键自动打开存放当前工作簿的文件夹，从而简化您的工作流程。这一直观的功能不仅为您节省宝贵时间，还简化了文件管理，使您可以快速访问、组织和管理所有相关文档。

点击“Kutools Plus” > “工作簿” > “打开当前文档所在文件夹”，即可打开当前工作簿所在的文件夹。此外，当前工作簿将在文档文件夹中被高亮显示。

使用 VBA 代码打开包含当前工作簿的文件夹

Excel 没有直接打开当前工作簿文件夹的内置命令。然而，VBA 提供了一种灵活的方式来添加此功能。以下是创建一个打开文件夹的宏的方法：

1. 点击“Alt+F11”打开“Microsoft Visual Basic for Applications”窗口。

2. 点击“插入” > “模块”，并将以下 VBA 代码粘贴到模块窗口中。

Sub OpenContainingFolder()
'Updateby Extendoffice
    Dim wbPath As String
    wbPath = ThisWorkbook.Path
    If wbPath <> "" Then
        Shell "explorer.exe " & wbPath, vbNormalFocus
    Else
        MsgBox "This workbook hasn't been saved yet. Please save it first.", vbExclamation
    End If
End Sub

3. 按 F5 键运行代码，当前工作簿所在的文件夹将立即打开。

总之，打开 Microsoft Excel 中当前工作簿所在的文件夹可以通过多种方法实现，每种方法都迎合了不同的用户偏好和工作流程。通过使用公式，您可以动态地在单元格中显示文件路径，提供对文件夹位置的快速参考。对于那些更倾向于用户友好方式的人来说，Kutools for Excel 提供了一个简化的解决方案，其内置功能使其成为经常管理文件和文件夹用户的绝佳选择。此外，VBA 代码为高级用户提供了一个强大且可定制的选项，允许自动化并集成到更大的工作流中。

选择最适合您需求的方法，并考虑将这些技术整合到您的日常 Excel 任务中，以获得更顺畅和更有条理的体验。如果您有兴趣探索更多 Excel 技巧，我们的网站提供了数千个教程，帮助您掌握 Excel。