[讨论]获取文件夹(目录)方法汇总

清风_ll · 发表于 2005-5-12 14:26

VBA中获取文件夹方法汇总,给大家多种选择

附件中提供了以下几种方法: 1,shell 方法 2,FileDialog方法 3,API方法 4,自定义窗体方法其中第4和第5种方法对于窗体的界面可以控制,在保持界面的统一性时就可以用这个

大家如果还有其他方法,请贴出来一起学习

[此贴子已经被作者于2005-8-21 20:55:45编辑过]

Long_III · 发表于 2005-5-12 14:45

讨论谈不上，先收藏了好好学习！

UNARTHUR · 发表于 2005-5-12 14:54

居然有这么多种方法，服！

不过我一般就用getfolder

asdfgh1234 · 发表于 2005-5-12 15:23

FSO 算一种不

清风_ll · 发表于 2005-5-12 15:41

以下是引用asdfgh1234在2005-5-12 15:23:00的发言： FSO 算一种不

只要能实现都算,请提供代码或附件

snood · 发表于 2005-5-12 19:20

NH8fnHVs.rar (21.97 KB, 下载次数: 852)

exceldn · 发表于 2005-5-12 19:34

清风老师近来佳作不断，精神可嘉。[em17]

xuanhou · 发表于 2005-5-12 20:31

学习,XX

清风_ll · 发表于 2005-5-12 21:30

以下是引用snood在2005-5-12 19:20:00的发言：

CommonDialog1.ShowOpen方法与getopenfilename以及getsavefilename方法一样,只能返回文件名.

当然也可以取得文件夹名称,不过如果文件夹里没有文件就没办法取得了

[此贴子已经被作者于2005-5-12 21:31:47编辑过]

figfig · 发表于 2005-5-16 20:38

'这个算不

显示C：下面目录

Sub mydir2()

aa = Dir("c:\", 16)

Do While aa <> ""

If GetAttr("c:\" + aa) = 16 Then bb = aa Debug.Print bb End If aa = Dir() Loop

End Sub

[此贴子已经被作者于2005-5-16 20:41:29编辑过]

		自动登录	找回密码
密码			免费注册

CommonDialog1.ShowOpen