반응형 회사 생활/칼퇴를 도와주는 엑셀 꿀팁13 엑셀 표 만들기[표 형식으로 변환하기] 1. 데이터를 표로 변환해야 하는 이유 구조적 참조를 사용해서 수식을 편하게 관리할 수 있다. (수식 걸기 편한다.) 표스타일링 가능 (셀 서식 자동 적용) 슬라이서 삽입 통한 내용 필터링 가능 2. 표 관리 시 주의 사항 데이터 첫행은 머릿글(제목)이 와야 한다. 셀병합 피하기 (셀병합이 있다면 피벗이나 필터링 사용이 어려워진다.) 데이터 축적은 세로로 하기! 예를들어 매달/매일 데이터를 정리하는 경우 데이터를 가로가 아닌, 세로로 누적 시켜야 한다. 3. 표로 변환하기 1. 표로 변환 할 데이터를 선택한다. (데이터 아무데나 클릭하고, Ctrl + a) 2. 데이터 → 테일블/범위에서 클릭한다. 3. 그냥 단축키로 변환 가능합니다. 4. 표 만들기 텍스트 박스가 나오면 확인 버튼을 누른다. 이때 머리.. 2023. 5. 27. [함수] 항목별 일련번호 넣기 오늘은 아래 그림처럼 항목별로 일련번호를 넣는 방법에 대해 알아 보겠습니다! 간단합니다. 구분행에 다음 수식을 넣으면 됩니다. = IF(B2=B1,A1+1,1) B2=B1 즉 옆에 회사명이 그 위의 행과 같으면 위의 일련번호에 +1, 그렇지 않으면 1을 불러오는 함수 입니다. 이렇게 하면 보시는 것과 같이 A2는 B2와 B1이 같지 않으므로 1을 불러 옵니다. 그리고 A2는 B3와 B2가 같으므로 A2(1)에 +1을 한 2가 불러오게 됩니다. 마찬가지로 A6은 B6과B5가 같지 않으므로 1을 불러 오게 됩니다. 간단한 함수지만 모랐다면 일일이 손으로 넣어줘야 하는 경우가. ㅠㅠ 2020. 6. 29. MS워드 특정 문장 변환하여 다른파일로 저장 계약서나 공문 등을 여러 업체로 보낼때 보통 메일머지 기능을 쓰지만 각 업체별로 파일을 가지고 있어야 할 경우가 생긴다. (예를 들어 각 계약서 공문을 만들어 계약 부서로 넘기는 경우 등) 나 같은 경우 계약서를 업체별로 만들어서 전자계약에 등록 할때 해당 매크로를 사용한 것으로 기억한다. 우선 작업을 하기 위해 워드 템플릿을 작성한다. 빨강색으로 표시 된 것처럼 변환해야할 부분을 { }로 표시하여 문서를 작성한다. 저 부분만 아래 엑셀 리스트를 참조하여 변환이 된다. 다음으로 아래 처럼 변환할 리스트를 만든다. 마지막으로 엑셀 파일에서 워드문서 생성을 클릭하면 워드파일의 빨간색 부분이 리스트에 있는 내용으로 바뀌면서 파일이 저장된다. 여기서 주의 해야할점은 1. 엑셀과 워드파일이 같은 폴더에 있어야 한.. 2020. 6. 28. [VBA 코드] 항목별로 시트 분리 하기 아래 그림처럼 제공출처 별로 정리하여 각각 다른 시트로 만들어 집니다.! 선택한 열의 각 항목별로 다른 시트로 분리해 주는 VBA 코드 Sub split_Sheet() Dim rng As Range Dim colsCnt As Integer Dim colNm As String Dim Imsi Dim sht As Long Application.ScreenUpdating = False For sht = Sheets.Count To 2 Step -1 Application.DisplayAlerts = False Sheets(sht).Delete Application.DisplayAlerts = True Next sht colNm = InputBox("시트로 분리할 필드의 열 머리글을 입력해 주세요.", "필드 머.. 2020. 6. 28. [VBA 코드] 여러 시트 데이터 하나의 시트로 모으기 "여러 시트 데이터 하나의 시트로 모으기" VBA 코드 입니다. Sub Combine() Dim I As Long Dim xRg As Range On Error Resume Next Worksheets.Add Sheets(1) ActiveSheet.Name = "Combined" For I = 2 To Sheets.Count Set xRg = Sheets(1).UsedRange If I > 2 Then Set xRg = Sheets(1).Cells(xRg.Rows.Count + 1, 1) End If Sheets(I).Activate ActiveSheet.UsedRange.Copy xRg Next End Sub VBA 코드 실행 하는 법은 아래 포스팅 참고 하세요! 2020/06/28 - [칼퇴를 도와주.. 2020. 6. 28. [VBA 코드] 시트별로 파일 저장 하기 시트별로 파일 저장하는 VBA 코드 입니다. Sub Split_book() Dim xPath As String xPath = Application.ActiveWorkbook.Path Application.ScreenUpdating = False Application.DisplayAlerts = False For Each xWs In ThisWorkbook.Sheets xWs.Copy Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".xlsx" Application.ActiveWorkbook.Close False Next Application.DisplayAlerts = True Application.ScreenUpdating =.. 2020. 6. 28. 월이 바뀌면 자동으로 구분선 그리기 1. 조건부 서식을 설정할 영역을 범위로 지정합니다. 2. '홈' 탭에서 '조건부 서식 - 새 규칙'을 선택합니다. 3. '새 서식 규칙' 대화상자에서 '수식을 사용하여 서식을 지정할 셀 결정'을 선택하고, 그림과 같이 수식을 입력합니다. =MONTH($A3)MONTH($A4) 현재 셀과 아래 셀 값의 '월'이 같은지 여부를 점검하는 수식입니다. 4. '서식' 버튼을 클릭하고 아래쪽 테두리를 설정하고 '확인' 버튼을 클릭합니다. 5. '새 서식 규칙' 대화상자가 나타나면 '확인' 버튼을 클릭합니다. 이제 월이 다를 경우, 자동으로 괘선이 그려집니다. 2020. 6. 28. 특정 종류의 문자만 선택적으로 추출 하기 한글, 영문, 숫자, 특수문자 등 여러 종류의 문자가 섞여 있을 경우 특정 종류의 문자만 추출하는 VBA 입니다. 원하는 셀에 "=fn문자추출($A4,1)" 입력하고, 1대신 아래 항목중 선택 하면 해당 종류의 문자만 추출 됩니다. 1 : 숫자, 2 : 영문, 3 : 한글, 4 : 기타 VBA 코드는 아래와 같습니다. 더보기 Function fn문자추출(문자열 As String, 구분 As Integer) As String Dim i As Integer Dim K As String Dim NumStr As String, EngStr As String, HanStr As String, EtcStr As String For i = 1 To Len(문자열) K = Mid(문자열, i, 1) Select Cas.. 2020. 6. 28. 엑셀 시트 정렬 및 관리 템플릿 엑셀 시트 관리 VBA 입니다. 많은 시트가 있는 엑셀파일 관리할 때 유용한 템플릿 입니다. 2020. 6. 28. 엑셀 VBA 코드 작성 및 실행 하기 1. 엑셀 실행 후 Alt - F11 눌러 주세요! 그러면 MS VBA Applications 가 실행 됩니다. 여기에서 삽입 - 모듈을 선택 합니다. 그럼 다음과 같이 코드 입력 창이 나옵니다. 그럼 여기에 코드를 붙여 넣으시면 해당 매크로(VBA)가 완성 됩니다. 해당 창을 닫고 보기 - 매크로 - 매크로보기를 누르거나 Alt+F8을 선택하면 매크로 실행 창이 나옵니다. 여기에서 해당 매크로를 선택하여 실행을 클릭하면 작성한 매크로가 실행됩니다. 2020. 6. 28. Special Merge 엑셀에서 셀을 병합하면 한셀에 있는 데이터만 남고 지워집니다. 하지만 다음 코드를 실행하면 다른행의 데이터도 그대로 남기고 행이 병합됩니다. [VBA 코드] Sub SpecialMerge() Dim output As String Dim inputrange As Variant Const space = " " On Error Resume Next For Each cell In Selection output = output & cell.Value & space Next cell With Selection .Clear .Cells(1).Value = output .Merge .HorizontalAlignment = xlGeneral .VerticalAlignment = xlCenter .WrapText = Tr.. 2020. 6. 28. 엑셀 행높이 열너비 동일하게 복사하기 1. 우선 아래 그림의 빨간 부분(행번호)을 포함해서 표를 선택하고 복사함. 그냥 표만 선택하면 행높이가 다르게 복사됩니다. (옆에 행번호를 선택 않하고 표만 복사하면 행 높이가 그냥 동일하게 복사 됩니다.) 2. 위와 같이 행 번호를 같이 복사하면 아래와 같이 행높이가 같게 복사됩니다. (아직 열너비는 다르네요^^) 3. 다시 원본을 선택하여 복사하기를 누르고 복사 대상에 선택하여 붙여넣기 그리고 열너비를 선택하고 복사를 합니다. 4. 아래와 같이 행높이와 열너비가 같게 복사가 됩니다. 결론 : 행 높이는 옆에 행번호를 같이 선택해서 복사, 열너비는 선택하여 붙여넣기의 열너비 2020. 6. 28. 이전 1 2 다음 반응형
