列出指定文件夹中的子文件夹和文件

最新推荐文章于 2022-09-21 21:23:39 发布

转载最新推荐文章于 2022-09-21 21:23:39 发布 · 893 阅读

EXCEL VBA 同时被 2 个专栏收录

17 篇文章

订阅专栏

VSTO

1 篇文章

订阅专栏

本文详细介绍了如何使用VBA和C#编程语言，通过创建对象和调用相关方法，列出指定文件夹内的所有子文件夹和文件。包括列出文件夹中的所有子文件夹、所有文件以及跨语言实现文件操作的技术细节。

VBA列出文件夹中所有的子文件夹

Sub ShowFolderList()
    Dim fso As Object, oFolder As Object
    Dim oFolderArray As Object, f As Object
    Dim k&

    Set fso = CreateObject("scripting.filesystemobject")
    Set oFolder = fso.GetFolder("C:/Program Files")
    Set oFolderArray = oFolder.SubFolders
    For Each f In oFolderArray
        k = k + 1
        Cells(k, 1) = f.Name
    Next

End Sub

VBA列出文件夹中所有的文件

Sub mydir()
    Dim mydir As String
    Dim i&
    Range("A:A").ClearContents
    mydir = Dir(ThisWorkbook.Path & "/*.*", vbNormal)
    Do While mydir <> ""
        i = i + 1
        Cells(i, 2) = mydir
        mydir = Dir
    Loop
End Sub

VSTO列出文件夹里所有的子文件夹和文件(C#)

int i = 0, k = 0;
DirectoryInfo dir = new DirectoryInfo(@"c:/windows");
DirectoryInfo[] dirs = dir.GetDirectories();
foreach (DirectoryInfo folder in dirs)
{
i++;
this.Range["a" + i, missing].Value2 = folder.Name;
}
FileInfo[] files = dir.GetFiles();
foreach (FileInfo file in files)
{
k++;
this.Range["b" + k, missing].Value2 = file.Name;
}