[Excel VBA] 폴더열기 Private Sub CommandButton1_Click() // 버튼을 클릭하면 파일검색을 위한 검색창이 뜸 fileToOpen = Application _ .GetOpenFilename("Text Files (*.txt), *.txt") If fileToOpen False Then MsgBox "Open " & fileToOpen End If End Sub programming 2009.05.19