팁 : 다른 언어는 Google 번역입니다. 방문하실 수 있습니다. English 이 링크의 버전.
로그인
x
or
x
x
회원가입
x

or

셀 값 목록에서 여러 워크 시트를 만드는 방법?

Excel에서 셀 값 목록을 기반으로 여러 워크 시트를 만들 수있는 빠르고 쉬운 방법이 있습니까? 이 기사에서는이 작업을 해결하기위한 몇 가지 유용한 트릭에 대해 이야기 할 것입니다.

VBA 코드로 셀 값 목록에서 여러 워크 시트 만들기

Excel 용 Kutools를 사용하여 셀 값 목록에서 여러 워크 시트 만들기

Office 탭 Office에서 탭 편집 및 찾아보기를 사용하고 훨씬 쉽게 작업 할 수 있습니다 ...
Excel 용 Kutools-최고의 Office 생산성 도구로 대부분의 Excel 문제를 해결할 수 있습니다.
  • 무엇이든 재사용하십시오 : 가장 많이 사용되거나 복잡한 수식, 차트 및 기타 항목을 즐겨 찾기에 추가하고 나중에 빠르게 재사용하십시오.
  • 20 이상의 텍스트 기능 : 텍스트 문자열에서 숫자 추출; 텍스트 일부 추출 또는 제거; 숫자와 통화를 영어 단어로 변환 ...
  • 병합 도구: 여러 통합 문서 및 시트를 하나로 통합합니다. 데이터 손실없이 여러 셀 / 행 / 열 병합 중복 행 및 합계 병합 ...
  • 분할 도구: 값을 기준으로 데이터를 여러 시트로 분할; 하나의 통합 문서에서 여러 Excel, PDF 또는 CSV 파일로; 하나의 열에서 여러 열로 ...
  • 건너 뛰기 붙여 넣기 숨겨진 / 필터링 된 행; 수와 합계 배경색 별; 메일 링리스트 생성 셀의 가치로 이메일 보내기...
  • 수퍼 필터 : 고급 필터 구성표를 작성하고 모든 시트에 적용하십시오. 종류 주별, 일별, 빈도 등으로; FILTER 굵게, 수식, 주석으로 ...
  • 300 이상의 강력한 기능; Office 2007-2019 및 365와 호환됩니다. 모든 언어를 지원합니다. 회사에서 쉽게 배포; 60 일 무료 평가판 전체 기능.

화살표 오른쪽 파란색 거품 VBA 코드로 셀 값 목록에서 여러 워크 시트 만들기

셀 값 목록으로 명명 된 여러 개의 새 워크 시트를 신속하게 작성하려면 다음 VBA 코드를 사용하십시오.

1. 누르고있어. ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈다음 코드를 모듈 창문.

VBA 코드 : 셀 목록에서 여러 워크 시트 만들기 :

Sub AddSheets()
'Updateby Extendoffice 20161215
    Dim xRg As Excel.Range
    Dim wSh As Excel.Worksheet
    Dim wBk As Excel.Workbook
    Set wSh = ActiveSheet
    Set wBk = ActiveWorkbook
    Application.ScreenUpdating = False
    For Each xRg In wSh.Range("A1:A7")
        With wBk
            .Sheets.Add after:=.Sheets(.Sheets.Count)
            On Error Resume Next
            ActiveSheet.Name = xRg.Value
            If Err.Number = 1004 Then
              Debug.Print xRg.Value & " already used as a sheet name"
            End If
            On Error GoTo 0
        End With
    Next xRg
    Application.ScreenUpdating = True
End Sub

주의 사항: 위의 코드에서, A1 : A7 시트를 만들려는 셀 범위입니다. 필요에 맞게 변경하십시오.

3. 그런 다음 F5 키를 눌러이 코드를 실행하면 현재 통합 문서의 모든 시트가 작성된 후 새 시트가 생성됩니다 (스크린 샷 참조).

doc 여러 시트 만들기 1


화살표 오른쪽 파란색 거품 Excel 용 Kutools를 사용하여 셀 값 목록에서 여러 워크 시트 만들기

위의 코드에 익숙하지 않은 경우 다음은 편리한 도구입니다.Excel 용 Kutools그와 시퀀스 워크 시트 만들기 함수를 사용하면 워크 시트는 새 통합 문서의 셀 값을 기반으로 만들어집니다.

Excel 용 Kutools : 300 이상의 편리한 Excel 추가 기능으로 60 일 동안 아무런 제한없이 시도 할 수 있습니다..

설치 후 Excel 용 Kutools, 다음과 같이하십시오 :

1. 딸깍 하는 소리 기업 > 워크 시트 > 시퀀스 워크 시트 만들기, 스크린 샷보기 :

doc 여러 시트 만들기 2

2. 에서 시퀀스 워크 시트 만들기 대화 상자 :

(1.) 시퀀스 워크 시트를 만들 워크 시트 하나를 선택하십시오.

(2.) 그런 다음 데이터 범위 옵션에서 시트 이름 기반 목록 상자에서 doc 여러 시트 만들기 4 버튼을 사용하여 사용할 셀 값을 선택하십시오.

doc 여러 시트 만들기 3

3. 그런 다음 Ok 버튼을 클릭하면 워크 시트가 새 통합 문서의 셀 값 이름으로 만들어집니다. 스크린 샷을 참조하십시오.

doc 여러 시트 만들기 5

다운로드를 클릭하고 지금 Excel 용 무료 평가판 Kutools를 다운로드하십시오!


Excel 용 Kutools-최고의 사무 생산성 도구 80 % 생산성 향상

  • 재사용: 빠르게 삽입 복잡한 수식, 차트 그리고 당신이 전에 사용했던 것; 셀 암호화 비밀번호로; 메일 링리스트 만들기 그리고 이메일을 보내 ...
  • 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집); 레이아웃 읽기 (많은 셀을 쉽게 읽고 편집); 필터링 된 범위에 붙여 넣기...
  • 셀 / 행 / 열 병합 데이터 손실없이; 분할 셀 내용; 중복 행 / 열 결합... 중복 세포 방지; 범위 비교...
  • 복제 또는 고유를 선택하십시오. 행; 빈 행 선택 (모든 세포는 비어있다); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 랜덤 선택 ...
  • 정확한 사본 공식 참조를 변경하지 않는 다중 셀; 참조 자동 작성 여러 장에; 글 머리 기호 삽입, 확인란 등 ...
  • 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 소계 생성 및 인쇄; 셀 내용과 주석 간 변환...
  • 수퍼 필터 (필터 구성표를 저장하고 다른 시트에 적용); 고급 정렬 월 / 주 / 일별, 빈도 등; 특수 필터 대담하고 기울임 꼴로
  • 통합 문서와 WorkSheets 결합; 키 열을 기준으로 테이블 병합 데이터를 여러 시트로 분할; 일괄 변환 xls, xlsx 및 PDF...
  • 300 이상의 강력한 기능. Office / Excel 2007-2019 및 365를 지원합니다. 모든 언어를 지원합니다. 기업이나 조직에 쉽게 배포 할 수 있습니다. 60 일 무료 평가판 전체 기능.
kte 탭 201905

Office 탭 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, 게시자, 액세스, Visio 및 프로젝트.
  • 새 창보다는 동일한 창에서 새 탭으로 여러 문서를 열고 만들 수 있습니다.
  • 50 %만큼 생산성을 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
오피셜
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Smitha · 2 months ago
    This is of great help. I could save so much time. Thank you so much for your time and for helping us with your wonderful code.
  • To post as a guest, your comment is unpublished.
    Craig · 7 months ago
    This works great, how could you incorporate a template into each created tab? i.e. copy and paste from a template into each newly created sheet
  • To post as a guest, your comment is unpublished.
    Nathan · 1 years ago
    First time using VBA code in Excel. Worked perfectly on the first try. Thanks for posting this.
  • To post as a guest, your comment is unpublished.
    amin · 1 years ago
    and it creates a lot of sheets even if the list is empty... what if i want to create sheets based on cells that have value?
  • To post as a guest, your comment is unpublished.
    GUEST · 1 years ago
    Better version. This will delete created sheet if exist another sheet with the same name. And added inputbox to avoid from manual code modification to select range.


    Sub AddSheetsFromCells()

    Dim xRg As Range, wBk As Workbook
    Set wBk = ActiveWorkbook

    On Error GoTo Quit
    Set dbRange = Application.InputBox("Range: ", "Select Range", _
    Application.Selection.Address, Type:=8)

    Application.ScreenUpdating = False
    Application.DisplayAlerts = False

    For Each xRg In dbRange
    With wBk
    .Sheets.Add After:=.Sheets(.Sheets.Count)
    On Error Resume Next
    ActiveSheet.Name = xRg.Value
    If Err.Number = 1004 Then
    Debug.Print Chr(34) & xRg.Value & Chr(34) & " already used as a sheet name"
    .ActiveSheet.Delete
    End If
    On Error GoTo 0
    End With
    Next xRg

    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
    Quit:

    End Sub
    • To post as a guest, your comment is unpublished.
      Josh · 29 days ago
      this is awesome...... thank-you very much .is there somewhere where there is a public repository for vba codes?
    • To post as a guest, your comment is unpublished.
      Craig Dickeson · 7 months ago
      What if i wanted each newly created sheet to have a template pasted into it from a template sheet? The template would have formatting and formulas only

      Thanks
    • To post as a guest, your comment is unpublished.
      Richard Pigford · 1 years ago
      This appears to work great for what I am attempting to do with one exception... It is creating blank worksheets... I want to create a copy of an existing worksheet for each row in another worksheet. Is there anyway to do that?