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