excel編程打開文件夾

A. excel中用宏打開一個文件夾（不是excel文件）代碼

在EXCEL中的vba編輯器中輸入以下代碼，將需要打開的文件夾路徑填寫完整。

Sub打開文件夾()
DimpAsString
p="C:Users"'這里填寫完整你需要打開文件夾的路徑
Shell"EXPLORER.EXE"&p,vbNormalFocus'打開文件夾
EndSub

B. EXCEL如何使用VBA打開相對路徑下的文件或文件夾

打開文件如下：

Workbooks.Open ("C:對賬單對帳單.xlsx")

這里你可以把「C:對賬單」換成你的絕對路徑，

你可以用：a = ThisWorkbook.Path

a = ThisWorkbook.Path

Workbooks.Open ("" & a & "&" "&對帳單.xlsx")

來獲取你當前表的絕對路徑，然後再打開，因為不知道你的具體情況，如果有問題可以hai我

如果當前文件夾下還有A文件夾可以用代碼：

Workbooks.Open ("" & a & "&" A"&b.xlsx")

C. Excel里如何設置搜索文件夾並打開文件

EXCEL是數據處理性軟體，自帶沒有此項功能

可以通過自帶編程語言VBA來擴展實現
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "a1" Then
myfile = Dir("D:\*" & [a1] & ".*")
Do While myfile <> ""
Workbooks.Open ("D:\" & myfile)
Loop
myfile = Dir
End If
End Sub