首页 > 解决方案 > 使用 Visual Basic 和用户窗体将文件夹中的多个文件内容提取到一个文件中以选择文件夹

问题描述

我想在 Visual Basic 中创建一个宏,它将从一个文件夹中选择所有 Excel 文件并将它们放入一个文件中。我使用了一个带有按钮的表单,该按钮将打开一个窗口来选择文件夹。

这是按钮代码,这里我只能选择文件而不是文件夹:

Private Sub importer_Click()
    Dim file As String
    file = Application.GetOpenFilename("excel (*.xlsx),*.xlsx", , "Chose", , True)

    If (LCase(file) <> "Faux" And file <> "0") Then

        liste_elements.AddItem (file)

    End If
End Sub

标签: vbaexcel

解决方案


为了选择多个文件,您应该将 MultiSelect 参数设置为 true。

在此处阅读有关它的更多信息:Application.GetOpenFilename 方法 (Excel)


推荐阅读