☰

如何使用 VBA 從 Excel 電子表格的清單中開啟資料夾

tag-icon • tag-icon microsoft-excel vba
如何使用 VBA 從 Excel 電子表格的清單中開啟資料夾 
Dim strFolderPath As String 
strFolderPath = “C:\temp\” 
ThisWorkbook.FollowHyperlink (strFolderPath)

此程式碼開啟一個特定的資料夾，但我需要開啟儲存在 Excel 工作表中的資料夾，如下所示：

1 穆罕默德

我需要程式碼來讀取路徑並使用 Excel 中的現有路徑開啟資料夾

答案1

你的意思是像下面這樣？

With ThisWorkbook.Sheets("Sheet1")   
    Range("C2").Hyperlinks(1).Follow
End with

如果您的地址實際上不是超連結：

With ThisWorkbook.Sheets("Sheet1")   
    ThisWorkbook.FollowHyperlink Address:=.Range("C2").Value, NewWindow:=False, AddHistory:=True
End with

另請注意，您的值目前沒有任何擴展。您可能想要在儲存格中或透過 VBA 新增這些：

Address:=.Range("C2").Value & ".extention"

相關內容