Note: The other languages of the website are Google-translated. Back to English

Excel의 각 행에 대해 새 시트를 만드는 방법은 무엇입니까?

A 열에 모든 학생의 이름이 있는 점수 테이블이 있다고 가정합니다. 이제 A 열에 이러한 이름을 기반으로 새 시트를 만들고 시트당 만들기에 고유한 학생 데이터가 포함되어 있다고 가정합니다. 또는 A열의 이름을 고려하지 않고 테이블의 각 행에 대해서만 새 시트를 생성하십시오. 이 비디오에서는 이를 달성하는 방법을 얻을 수 있습니다.

VBA 코드로 각 행에 대한 새 시트 만들기
Excel 용 Kutools의 데이터 분할 유틸리티를 사용하여 각 행에 대한 새 시트 만들기


VBA 코드로 각 행에 대한 새 시트 만들기

다음 코드를 사용하면 열 값을 기반으로 새 시트를 만들거나 Excel의 각 행에 대해 새 시트를 만들 수 있습니다.

1. 프레스 다른 + F11 동시에 열려면 키 응용 프로그램 용 Microsoft Visual Basic 창.

2. 에서 응용 프로그램 용 Microsoft Visual Basic 창을 클릭합니다 끼워 넣다 > 모듈. 그런 다음 다음 코드를 모듈 창.

VBA 코드 : 열을 기반으로 각 행에 대한 새 시트 만들기

Sub parse_data()
'Update by Extendoffice 2018/3/2
    Dim xRCount As Long
    Dim xSht As Worksheet
    Dim xNSht As Worksheet
    Dim I As Long
    Dim xTRrow As Integer
    Dim xCol As New Collection
    Dim xTitle As String
    Dim xSUpdate As Boolean
    Set xSht = ActiveSheet
    On Error Resume Next
    xRCount = xSht.Cells(xSht.Rows.Count, 1).End(xlUp).Row
    xTitle = "A1:C1"
    xTRrow = xSht.Range(xTitle).Cells(1).Row
    For I = 2 To xRCount
        Call xCol.Add(xSht.Cells(I, 1).Text, xSht.Cells(I, 1).Text)
    Next
    xSUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For I = 1 To xCol.Count
        Call xSht.Range(xTitle).AutoFilter(1, CStr(xCol.Item(I)))
        Set xNSht = Nothing
        Set xNSht = Worksheets(CStr(xCol.Item(I)))
        If xNSht Is Nothing Then
            Set xNSht = Worksheets.Add(, Sheets(Sheets.Count))
            xNSht.Name = CStr(xCol.Item(I))
        Else
            xNSht.Move , Sheets(Sheets.Count)
        End If
        xSht.Range("A" & xTRrow & ":A" & xRCount).EntireRow.Copy xNSht.Range("A1")
        xNSht.Columns.AutoFit
    Next
    xSht.AutoFilterMode = False
    xSht.Activate
    Application.ScreenUpdating = xSUpdate
End Sub

주의 사항: A1 : C1은 테이블의 제목 범위입니다. 필요에 따라 변경할 수 있습니다.

3. 프레스 F5 키를 눌러 코드를 실행하면 아래 스크린 샷과 같이 현재 통합 문서의 모든 워크 시트 다음에 새 워크 시트가 생성됩니다.

열 값을 고려하지 않고 각 행에 대해 직접 새 시트를 작성하려는 경우 다음 코드를 사용할 수 있습니다.

VBA 코드 : 각 행에 대해 직접 새 시트 만들기

Sub RowToSheet()
	Dim xRow As Long
	Dim I As Long
	With ActiveSheet
		xRow = .Range("A" & Rows.Count).End(xlUp).Row
		For I = 1 To xRow
			Worksheets.Add(, Sheets(Sheets.Count)).Name = "Row " & I
			.Rows(I).Copy Sheets("Row " & I).Range("A1")
		Next I
	End With
End Sub

코드를 실행하면 활성 워크 시트의 각 행이 새 워크 시트에 배치됩니다.

주의 사항: 머리글 행도이 VBA 코드를 사용하여 새 시트에 배치됩니다.


Excel 용 Kutools의 데이터 분할 유틸리티를 사용하여 각 행에 대한 새 시트 만들기

사실 위의 방법은 복잡하고 이해하기 어렵습니다. 이 섹션에서는 데이터 분할 ~의 유용성 Excel 용 Kutools.

신청하기 전에 Excel 용 Kutools, 제발 먼저 다운로드하여 설치하십시오..

1. 새 시트를 만드는 데 사용해야하는 테이블을 선택한 다음 쿠툴즈 플러스> 침 데이터. 스크린 샷보기 :

2. 에서 데이터를 여러 워크 시트로 분할 대화 상자에서 다음과 같이하십시오.

A. 열 값을 기준으로 새 시트를 만드는 경우 :

1). 선택하십시오 특정 열 옵션을 클릭하고 드롭 다운 목록에서 데이터를 분할 할 열을 지정합니다.
2). 열 값으로 워크 시트의 이름을 지정하려면 다음을 선택하십시오. 컬럼 값 에서 규칙 드롭 다운 목록;
3). 클릭 OK 단추. 스크린 샷보기 :

B. 각 행에 대한 새 시트를 직접 만드는 경우 :

1). 고르다 고정 행 옵션, 숫자 입력 1 상자에;
2). 고르다 행 번호 인사말 규칙 드롭 다운 목록;
3). 클릭 OK 단추. 스크린 샷보기 :

내부에 모든 새 시트가 포함 된 새 통합 문서가 생성됩니다. 아래 스크린 샷을 참조하십시오.

열 값을 기반으로 각 행에 대한 새 시트 만들기 :

열 값을 고려하지 않고 각 행에 대해 새 시트 만들기 :

  무료 평가판(30-일) 이 유틸리티의 그것을 다운로드하려면 클릭하십시오을 클릭 한 다음 위 단계에 따라 작업 적용으로 이동합니다.

Excel 용 Kutools의 데이터 분할 유틸리티를 사용하여 각 행에 대한 새 시트 만들기


최고의 사무 생산성 도구

Excel용 Kutools는 대부분의 문제를 해결하고 생산성을 80% 증가시킵니다.

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

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
officetab 하단
코멘트 (33)
아직 평가가 없습니다. 가장 먼저 평가하세요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 템플릿 파일 Myformat을 기반으로 워크시트를 만들고 첫 번째 열 데이터에 따라 이름을 지정하고 싶습니다. 다음과 같이 VBA 코드를 사용자 정의했지만 빈 시트가 너무 많이 생성됩니다. 빈 시트 생성을 중단하는 데 도움을 주시겠습니까? 고맙습니다. Kumar Sub AddSheets() Dim cell As Excel.Range Dim wsWithSheetNames As Excel.Worksheet Dim wbToAddSheetsTo As Excel.Workbook Set wsWithSheetNames = ActiveSheet Set wbToAddSheetsTo = ActiveWorkbook wsWithSheetNames.Range("A2:A165".To wsWithSheetNames.Range의 각 셀에 대해) 다음에 추가:=ActiveSheet Sheets.Add 유형:= _ "C:\Users\Dimple\AppData\Roaming\Microsoft\Templates\MyFormat.xltx" On Error Resume Next ActiveSheet.Name = cell.Value If Err.Number = 1004 then Debug.Print cell.Value & "이미 시트 이름으로 사용됨" End If On Error GoTo 0 End With Next cell End Sub
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕,
나는 항상 A 행의 고유 항목당 2개의 시트를 얻습니다. 이유를 알겠어요? 또한 생성된 시트가 생성하는 행의 총량을 시트 이름 앞에 추가하는 것이 얼마나 어려울까요? 정말 고마워! 기부를 하면 알려주세요.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, Excel 파일 템플릿 MyFormat을 사용하여 워크시트를 생성하고 첫 번째 열의 데이터로 워크시트의 이름을 지정하고 싶습니다. 다음 VBA 코드는 MyFormat에 따라 워크시트를 생성하기 위해 정상적으로 작동합니다. 그러나 일반 Excel 템플릿에서도 수백 개의 빈 시트가 생성됩니다. 일부 신체가 초과 공백 시트 생성을 중지하는 데 도움이 될 수 있습니다. Kumar Sub AddSheets() Dim cell As Excel.Range Dim wsWithSheetNames As Excel.Worksheet Dim wbToAddSheetsTo As Excel.Workbook Set wsWithSheetNames = ActiveSheet Set wbToAddSheetsTo = ActiveWorkbook의 각 셀에 대한 wsWithSheetNames.Range("A2:A165.SheetsToAddTo") . 뒤에 추가:=ActiveSheet Sheets.Add 유형:= _ "C:\Users\Dreamline\AppData\Roaming\Microsoft\Templates\MyFormat.xltx" 오류 시 다음 ActiveSheet.Name = cell.Value Err.Number = 1004 그런 다음 Debug.Print cell.Value & "이미 시트 이름으로 사용됨" End If On Error GoTo 0 End With Next cell End Sub
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
워크시트 이름은 XNUMX자 이하여야 합니다.
아주 일반적인 지식은 아니지만 그렇지 않으면 코드는 기본 빈 "시트 #" 워크시트를 출력합니다.

구문 분석 코드가 실행될 새 워크시트를 만들고 다음과 같이 첫 번째 열을 참조합니다.
=IF(OR('참조된 원본'!B1<>"", LEN('참조된 원본'!B1)>30), LEFT('참조된 원본'!B1,30),'참조된 원본'!B1)


시트의 나머지 부분을 복사하거나 참조하십시오. 다른 워크시트를 참조하는 데 문제가 있는 경우 열에 데이터 유효성 검사 제한이 없는지 확인하십시오.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이렇게 올려주셔서 감사합니다!!!! 매력처럼 일했습니다. 첫 번째 코드 세트가 어떻게 작동하는지 설명할 수 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
고마워요!



VBA 코드에서 결합된 첫 번째 및 두 번째 열 행 데이터에서 결과 시트의 이름을 지정하는 방법이 있습니까?



예를 들어 시트 2의 이름은 자동으로 "linda 100"이 됩니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 조이스,
귀하의 의견에 감사드립니다! 아래 VBA 스크립트가 도움이 되기를 바랍니다.

하위 parse_data()
Dim xRCount As Long
워크시트로 Dim xSht
워크시트로 Dim xNSht
흐릿한 I As Long
Dim xTRrow As Integer
새 컬렉션으로 Dim xCol
Dim xTitle을 문자열로
오류에 대한 다음 재개
Application.ScreenUpdating = False
xSht = ActiveSheet 설정
xRCount = xSht.UsedRange.End(xlDown).Row
xTitle = "A1:B1"
xTRrow = xSht.Range(xTitle).Row
I = 2 xRCount에 대해
xCol.Add(CStr(xSht.Cells(I, 1)), CStr(xSht.Cells(I, 1))) 호출
다음
Debug.Print xCol.Count
I = 1에서 xCol.Count까지
호출 xSht.Range(xTitle).AutoFilter(1, CStr(xCol.Item(I)))
xNSht = 없음 설정
xNSht = Worksheets(CStr(xCol.Item(I)))로 설정
xNSht가 아무것도 아닌 경우
xNSht = Worksheets.Add(, Sheets(Sheets.Count)) 설정
xNSht.Name = CStr(xCol.Item(I) & xSht.Cells(I + 1, 2))
다른
xNSht.Move , 시트(Sheets.Count)
END IF
xSht.Range("A" & xTRrow & ":A" & xRCount).EntireRow.Copy xNSht.Range("A1")
xNSht.Columns.AutoFit
다음
xSht.AutoFilterMode = 거짓
xSht.활성화
Application.ScreenUpdating = True
최종 하위
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것은 내가 찾던 바로 그 점에서 매우 도움이 되었습니다. 감사해요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이 코드는 매우 유용하며 거의 내가 찾던 것입니다.
그러나 두 장의 시트가 있도록 조정할 수 있습니까?
시트 1은 데이터입니다. A 열이 이름인 데이터 테이블입니다.
시트 2는 채우기가 필요한 수많은 필드가 있는 템플릿입니다.
내가 기대했던 것은 매크로를 실행하는 것입니다.
1 템플릿을 복사하여 같은 파일에 붙여넣고 시트 이름을 셀 A1의 이름으로 지정합니다.
2 셀 B1을 복사한 다음 새 템플릿의 선택한 필드에 붙여넣습니다.
3 비어 있을 때까지 1행을 따라 반복
4 그런 다음 2행과 각 행이 끝날 때까지 반복합니다.
결과는 x 번호가 있는 파일입니다. 모든 필드가 채워진 템플릿과 동일한 시트.
템플릿에서 테이블로 데이터를 추출하여 다른 방식으로 작동하는 파일을 상속받았지만 되돌릴 수는 없습니다.....
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 샘,
여기에 통합 문서를 첨부할 수 있다면 좋을 것입니다.
아래 파일 업로드 버튼으로 파일을 업로드할 수 있습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요 귀하의 코드를 사용하려고 시도했지만 오류가 발생합니다
런타임 오류 '1004':
응용 프로그램 정의 또는 개체 정의 오류
나는 VBA(또는 그 문제에 대한 기술)에 대한 지식이 없지만 프레스 디버그하면 11행 xRCount=xSht.Cells(xSht.Rows.Count,1)가 강조 표시됩니다. 끝(xIUp).행
저는 127개의 열과 337개의 행(행은 열에 따라 다름)이 있는 큰 파일로 작업하고 있으며 숫자와 세부 정보가 포함된 목록입니다.
말씀하신 대로 범위를 변경했지만 여전히 작동하지 않습니다. Excel 2010을 사용하고 있습니다. 가능하면 작동하게 만드는 방법을 알려주실 수 있나요?
고맙습니다
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는 베아트리스,
코드는 문제 해결로 업데이트됩니다. 다시 시도해 주세요. 당신의 의견에 감사드립니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 여기에 제 상황에 유용한 것이 있다고 생각하지만 VBA 또는 스크립트를 수행할 수 있습니다. 도움이 되었으면 합니다.
데이터로 채울 많은 셀이 있는 템플릿이 있고 템플릿에 입력하고 싶은 검색 키(고유하지 않음)가 있습니다. 검색 키를 기반으로 데이터를 검색하고 일치하는 키의 해당 데이터를 가져와 템플릿에 채웁니다. 채워진 템플릿이 새 워크시트에 저장됩니다. 일치 항목이 1개 이상 있을 수 있습니다. 모든 일치 항목이 선택되고 특정 수의 새 워크시트가 생성될 때까지 목록을 계속 검색하려면 스크립트가 필요합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 각각의 새 워크시트에 제목 행을 유지하는 방법이 있습니까? (내 첨부 파일에 빨간색 동그라미)

이 코드는 내 마스터 워크시트의 모든 행을 가져와 새 워크시트로 전송합니다. 그러나 각 새 워크시트의 맨 위에 "마스터" 헤더 값(빨간색 원)을 유지하고 싶습니다. 감사해요!



위에서 이 코드를 참조하고 있습니다.

하위 RowToSheet()
길이만큼 xRow 희미하게 만들기
흐릿한 I As Long
액티브 시트 포함
xRow = .Range("A" & Rows.Count).End(xlUp).Row
I = 1에서 xRow까지
Worksheets.Add(, Sheets(Sheets.Count)).Name = "행" & I
.Rows(I).Copy Sheets("Row" & I).Range("A1")
다음

최종 하위
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
훌륭한 코드지만 내 데이터가 A열 대신 G열에 있는 경우 도움을 받을 수 있습니까? 다른 탭에 열 G 데이터를 사용하려면 무엇을 변경해야 합니까?

감사
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것은 훌륭한 코드입니다. OfficeExtend의 ​​브레인박스에 감사드립니다!! 어쨌든 이 코드를 약간 조정하여 행 대신 각 *열*에 대해 별도의 시트를 생성할 수 있습니까? 나는 내가 달성하려고하는 사진을 첨부했습니다. 이게 가능해? 감사합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
좋은 날,
나는 여기에서 당신의 사진을 보지 못했습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 내 이름 필드가 C 열에 있는 경우 코드를 수정하는 방법
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요 Abdul Basit님,
아래 VBA 코드가 도움이 될 수 있습니다. 시도해 주세요.
xCName = "3" 줄에서 3은 Excel의 열 번호(여기서는 C 열)를 나타냅니다. 필요에 따라 열 번호로 변경할 수 있습니다.

하위 parse_data()
' 업데이트 Extendoffice 2018 / 3 / 2
Dim xRCount As Long
워크시트로 Dim xSht
워크시트로 Dim xNSht
흐릿한 I As Long
Dim xTRrow As Integer
새 컬렉션으로 Dim xCol
Dim xTitle을 문자열로
부울로 Dim xSUpdate
Dim xCName을 정수로
Dim xTA, xRA, xSRg1을 문자열로
xSht = ActiveSheet 설정
오류에 대한 다음 재개
xRCount = xSht.Cells(xSht.Rows.Count, 1).End(xlUp).Row
xTitle = "A1:C1"
xCName = "3" '이 번호를 기반으로 새 시트를 만들 열 번호로 변경하십시오.
xTRrow = xSht.Range(xTitle).Cells(1).Row
I = 2 xRCount에 대해
xCol.Add(xSht.Cells(I, xCName).Text, xSht.Cells(I, xCName).Text) 호출
다음
xSUpdate = 응용 프로그램.화면 업데이트
Application.ScreenUpdating = False
xSRg = xSht.Cells(1, xCName).Address(RowAbsolute:=False, ColumnAbsolute:=False)
I = 1에서 xCol.Count까지
호출 xSht.Range(xTitle).AutoFilter(xCName, CStr(xCol.Item(I)))
xNSht = 없음 설정
xNSht = Worksheets(CStr(xCol.Item(I)))로 설정
xNSht가 아무것도 아닌 경우
xNSht = Worksheets.Add(, Sheets(Sheets.Count)) 설정
xNSht.Name = CStr(xCol.Item(I))
다른
xNSht.Move , 시트(Sheets.Count)
END IF
xSht.Range("A" & xTRrow & ":A" & xRCount).EntireRow.Copy xNSht.Range("A1")
xNSht.Columns.AutoFit
다음
xSht.AutoFilterMode = 거짓
xSht.활성화
Application.ScreenUpdating = xSUpdate
최종 하위
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
트릭을 수행하는 멋진 VBA 코드.

첫 번째 열을 복사하지 않도록 어떻게 수정할 수 있습니까? 열 이름을 제거하려면?

문안 인사
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
특정 열을 사용하여 시트의 이름을 자동으로 지정하는 방법에 대한 도움을 받을 수 있습니까? 이것은 시트 VBA에 대한 행입니다. 아래 참조

하위 RowToSheet()

길이만큼 xRow 희미하게 만들기

흐릿한 I As Long

액티브 시트 포함

xRow = .Range("A" & Rows.Count).End(xlUp).Row

I = 1에서 xRow까지

Worksheets.Add(, Sheets(Sheets.Count)).Name = "행" & I

.Rows(I).Copy Sheets("Row" & I).Range("A1")

다음



최종 하위
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
뒤에 공백이 숨겨져 있다는 사실을 잊지 마십시오. TRIM 기능을 사용하여 정리했습니다. 행 수를 가짐(라인 수는 실제로 시트에 추가된 행 -1이 놀랍습니다)
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
위 코드(크레딧)의 사용을 참조하는 방법은 무엇입니까? 코드 수정이 가능한가요?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요 오픈커뮤니케이션 플랫폼입니다. 코드를 참조하고 수정할 수 있습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
나나
86
2
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요! 방금 이 코드를 사용했고 작동했습니다! 각 항목에 대해 새 시트를 만드는 것 외에도 열로 바꾸려고 하는데 알 수 없습니다. 따라서 위의 예에서 Nana의 출력은 다음과 같습니다. 이름 나나점수 86아니. 2
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 이 코드를 사용하고 작동했지만 헤더에서 둘 이상의 행을 선택하려면 코드에서 무엇이 변경됩니까? 모든 시트에 원하는 시트에 여러 줄이 있습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 어떻게 알아 냈습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 매크로가 실행될 때마다 1개의 새 시트만 추가하는 코드가 있습니까? A1 등의 내용 기대에 감사합니다
아직 코멘트가 없습니다
더보기
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치

Follow Us

저작권 © 2009 - WWW.extendoffice.com. | 판권 소유. 에 의해 구동 ExtendOffice. | | 사이트 맵
Microsoft 및 Office 로고는 미국 및 / 또는 기타 국가에서 Microsoft Corporation의 상표 또는 등록 상표입니다.
Sectigo SSL로 보호