VBA 에서 파일 또는 폴더 선택하는 GUI 사용하기 (FileDialog)

VBA에서 내 컴퓨터처럼 폴더 또는 파일을 선택하는 GUI가 필요할 수 있습니다.

 

그럴 때 사용하는 게 FileDialog입니다.

 

함수는

Application.FileDialog입니다.

 

Application이라는 함수 안에 포함되어있습니다.

 

FileDialog를 사용하는데 4개 종류가 있습니다.

 

Name	Value	Desc
msoFileDialogFilePicker	3	File Picker dialog box.
msoFileDialogFolderPicker	4	Folder Picker dialog box.
msoFileDialogOpen	1	Open dialog box.
msoFileDialogSaveAs	2	Save As dialog box.

 

※ 1번과 3번의 차이를 모릅니다.

 

아래와 같은 GUI가 노출되어 선택할 수 있습니다.

 

사용방법은 아래 코드로 작성했습니다.

 

Sub FileSelect()
Dim Information As FileDialog

Set Information = Application.FileDialog(3) '숫자는 Enum값

With Information
    .AllowMultiSelect = True 'FileDialog(1) 또는 FileDialog(3) 일 때만 사용
    .Show
    for each FileName in .selectedItems
    	Debug.Print(FileName) ' 다수개 선택했을 때 파일명을 한개씩 호출
    next
End With



End Sub