Excel에서 데이터 목록을 기반으로 여러 폴더 및 하위 폴더 생성

워크시트 범위 내에 직원 이름 목록이 있고 각 직원의 정보를 저장하기 위해 개별 폴더를 생성하려고 한다고 가정해 봅시다. 각 폴더를 수동으로 생성하는 것은 시간이 많이 소요될 수 있습니다. 그러나 이 과정을 가속화할 수 있는 효율적인 방법들이 있습니다. 이 가이드에서는 지정된 셀 값에 따라 폴더를 신속하게 생성하는 몇 가지 접근 방식을 공유하겠습니다.

셀 값에 따라 폴더 생성

• MD 명령어와 메모장을 사용하여
• 강력한 기능인 Kutools for Excel 사용
• VBA 코드를 사용하여

VBA 코드를 사용하여 셀 값에 따라 폴더 및 하위 폴더 생성

셀 값에 따라 폴더 생성

이 섹션에서는 셀 값 목록을 기반으로 폴더를 신속하고 쉽게 생성하기 위한 포괄적인 단계별 지침과 다양한 방법을 자세히 살펴보겠습니다.

MD 명령어와 메모장을 사용하여 목록에서 폴더 생성

MD 명령어와 메모장을 사용하여 Excel 목록을 폴더로 변환하는 것은 배치 스크립팅의 간편함과 Excel의 정리 능력을 결합한 영리한 트릭입니다. 이 방법은 많은 양의 폴더를 빠르게 생성해야 할 때 수작업 없이 처리할 수 있어 매우 유용합니다. 다음은 이 작업을 수행하기 위한 단계별 가이드입니다.

1단계: MD 명령어를 사용하여 수식 생성

첫 번째 셀 값(예: B1) 옆의 빈 셀에 다음 수식을 복사하거나 입력한 후, 채우기 핸들을 아래로 드래그하여 모든 목록 항목에 수식을 적용합니다.

="MD "&A1

2단계: 수식을 메모장 파일에 복사 및 붙여넣기

1. MD 명령어 수식이 포함된 셀을 복사하려면 "Ctrl + C"를 누릅니다.
2. 메모장을 열고 "Ctrl + V"를 눌러 새 파일에 명령어를 붙여넣습니다.
   

3단계: 메모장 파일을 .bat 파일로 저장

메모장의 "파일" 탭에서 "다른 이름으로 저장"을 클릭합니다. "다른 이름으로 저장" 대화 상자에서 여러 폴더를 생성하려는 디렉토리를 선택하고 .bat 확장자를 포함한 파일 이름을 지정합니다. 마지막으로 "저장" 버튼을 클릭합니다. 스크린샷 참조:

4단계: .bat 파일을 두 번 클릭하여 여러 폴더 생성

1. 메모장 파일을 닫고 이전에 .bat 파일을 저장한 폴더로 이동합니다.
2. 이제 마법을 확인하세요: 파일을 두 번 클릭하면 여러 폴더가 한 번에 생성되는 것을 볼 수 있습니다. 아래 데모를 참조하세요:
   

강력한 도구인 Kutools for Excel을 사용하여 목록에서 폴더 생성

Kutools for Excel의 강력한 "범위를 기반으로 폴더 생성" 기능을 통해 이제 Excel 목록에서 폴더를 쉽게 빠르게 생성할 수 있습니다. 기본 폴더뿐만 아니라 다중 레벨 하위 폴더로 구성된 복잡한 구조도 한 번에 생성할 수 있습니다. 몇 가지 간단한 단계만으로 Excel 데이터를 체계적인 폴더 시스템으로 변환하여 생산성을 크게 향상시킬 수 있습니다.

Kutools for Excel 설치 후 "Kutools Plus" > "가져오기 / 내보내기" > "범위를 기반으로 폴더 생성"을 클릭하여 "범위를 기반으로 폴더 생성" 대화 상자를 엽니다:

1. 폴더를 생성할 셀 값을 선택합니다;
2. 그런 다음, 버튼을 클릭하여 폴더를 저장할 대상 폴더를 지정합니다;
3. 마지막으로 "확인" 버튼을 클릭합니다.
   

결과:

Kutools는 시트의 목록을 처리하고 지정된 대상에 각 항목에 대한 폴더를 생성합니다. 결과를 확인하려면 대상 폴더로 이동하세요. 스크린샷 참조:

VBA 코드를 사용하여 목록에서 폴더 생성

Excel에서 VBA 코드를 사용하면 목록에서 폴더를 생성하는 지루한 작업을 빠르고 자동화된 프로세스로 전환할 수 있습니다. 이 섹션에서는 VBA 코드를 적용하여 폴더를 생성하는 방법을 보여드리겠습니다.

1단계: VBA 모듈 편집기를 열고 코드 복사

1. Excel에서 "ALT + F11" 키를 누르면 "Microsoft Visual Basic for Applications" 창이 열립니다.
2. "삽입" > "모듈"을 클릭하고 모듈 창에 다음 코드를 붙여넣습니다.
   VBA 코드: 셀 값 목록에 따라 폴더 생성

   Sub CreateFoldersFromSelection()
   'Updateby Extendoffice
       Dim FolderPath As String
       Dim Cell As Range
       Dim SelectedRange As Range
       Dim FolderName As String
       On Error Resume Next
       Set SelectedRange = Application.InputBox("Select the range with folder names", "Kutools for Excel", Type:=8)
       If SelectedRange Is Nothing Then Exit Sub
       On Error GoTo 0
       
       With Application.FileDialog(msoFileDialogFolderPicker)
           .Title = "Select the destination Folder"
           .AllowMultiSelect = False
           If .Show <> -1 Then Exit Sub
           FolderPath = .SelectedItems(1) & "\"
       End With
       
       For Each Cell In SelectedRange
           FolderName = FolderPath & Cell.Value
           If Cell.Value <> "" And Not FolderExists(FolderName) Then
               MkDir FolderName
           End If
       Next Cell
   End Sub
   
   Function FolderExists(ByVal Path As String) As Boolean
       On Error Resume Next
       FolderExists = (GetAttr(Path) And vbDirectory) = vbDirectory
       On Error GoTo 0
   End Function
   

2단계: 코드 실행

1. 코드를 붙여넣은 후 F5 키를 눌러 코드를 실행합니다. 나타나는 대화 상자에서 폴더를 생성할 셀 값을 선택하고 "확인"을 클릭합니다.
   
2. 다음에 표시되는 "대상 폴더 선택" 창에서 생성된 폴더를 출력할 대상 경로를 지정합니다. 그런 다음 "확인" 버튼을 클릭하세요. 스크린샷 참조:
   

결과:

VBA 코드를 실행한 후 대상 디렉토리로 이동하여 결과를 확인하세요. 새로 생성된 폴더가 Excel 목록의 각 항목에 해당하는 것을 볼 수 있습니다. 스크린샷 참조:

VBA 코드를 사용하여 셀 값에 따라 폴더 및 하위 폴더 생성

때때로 폴더뿐만 아니라 해당 하위 폴더도 Excel 셀 내의 데이터를 기반으로 생성해야 하는 상황에 처할 수 있습니다. 이 작업을 수행하기 위해 여기에서는 VBA 코드를 소개하겠습니다.

1단계: 데이터 준비

먼저 다음 스크린샷에 표시된 대로 데이터를 입력하세요. 주 폴더 이름을 첫 번째 열에 배치하고 하위 폴더 이름을 두 번째 열에 배치합니다.

2단계: VBA 모듈 편집기를 열고 코드 복사

1. Excel에서 "ALT + F11" 키를 누르면 "Microsoft Visual Basic for Applications" 창이 열립니다.
2. "삽입" > "모듈"을 클릭하고 모듈 창에 다음 코드를 붙여넣습니다.
   VBA 코드: 셀 값에 따라 폴더 및 하위 폴더 생성

   Sub CreateFoldersAndSubfoldersWithUserInput()
   'Updateby Extendoffice
       Dim Rng As Range
       Dim Cell As Range
       Dim basePath As String
       Dim fldrPicker As FileDialog
       Dim FolderPath As String, subfolderPath As String
       On Error Resume Next
       Set Rng = Application.InputBox("Select the range of cells (two columns: one is folder column, another s subfolder column):", "Kutools for Excel", Type:=8)
       If Rng Is Nothing Then Exit Sub
       On Error GoTo 0
       Set fldrPicker = Application.FileDialog(msoFileDialogFolderPicker)
       With fldrPicker
           .Title = "Select the Base Folder Path"
           .AllowMultiSelect = False
           If .Show <> -1 Then Exit Sub
           basePath = .SelectedItems(1)
       End With
       If Right(basePath, 1) <> "\" Then basePath = basePath & "\"
       For Each Cell In Rng.Columns(1).Cells
           If Not Cell.Value = "" Then
               FolderPath = basePath & Cell.Value
               If Not FolderExists(FolderPath) Then MkDir FolderPath
               If Not Cell.Offset(0, 1).Value = "" Then
                   subfolderPath = FolderPath & "\" & Cell.Offset(0, 1).Value
                   If Not FolderExists(subfolderPath) Then MkDir subfolderPath
               End If
           End If
       Next Cell
   End Sub
   
   Function FolderExists(FolderPath As String) As Boolean
       On Error Resume Next
       FolderExists = (GetAttr(FolderPath) And vbDirectory) = vbDirectory
       On Error GoTo 0
   End Function
   

3단계: 코드 실행

1. 코드를 붙여넣은 후 F5 키를 눌러 코드를 실행합니다. 나타나는 대화 상자에서 폴더를 생성할 셀 값을 선택하고 "확인"을 클릭합니다.
   
2. 다음에 표시되는 팝업 창에서 생성된 폴더를 출력할 대상 경로를 지정합니다. 그런 다음 "확인" 버튼을 클릭하세요. 스크린샷 참조:
   

결과:

VBA 코드를 실행한 후 대상 디렉토리로 이동하여 결과를 확인하세요. 셀 값에 따라 폴더와 해당 하위 폴더가 성공적으로 생성되었음을 알 수 있습니다. 다음 스크린샷을 참조하세요:

관련 기사: