엑셀 날짜 요일 같이 표시하는 방법 2가지

엑셀 작업을 하다 보면 날짜와 요일을 같이 표시해야 하는 경우가 있습니다. 예를 들어 '2024-11-22(금)' 형식과 같이 표시해야 하는 경우가 있는데요. 이번 시간에는 엑셀 날짜 요일 같이 표시하는 방법 2가지를 알아보겠습니다. 엑셀에서 엑셀 날짜 서식을 약간 수정하면 예시 처럼 간단하게 날짜 옆에 요일을 넣을 수 있습니다. 그리고 VBA를 이용하여 표시를 할 수 있는데요. 여러분들도 천천히 따라 해 보시기 바랍니다.

 

엑셀 날짜 요일 같이 표시하는 방법

 

 

A2셀부터 A10셀까지 날짜를 입력하면 날짜와 요일이 같이 표시되도록 만들어 보겠습니다.

 

1. A2셀부터 A10셀까지 블럭을 설정해 줍니다. 오른쪽 마우스 버튼을 클릭한 다음 '셀 서식'을 클릭합니다.

 

2. 셀 서식 화면에서 '표시 형식' 탭을 선택합니다. 그리고 '사용자 지정'을 클릭합니다.

3. 형식 입력란에 'yyyy-mm-dd(aaa)'을 입력해 줍니다. 그리고 '확인' 버튼을 클릭합니다.

 

 

3. 날짜를 입력한 후 엔터키를 누르면 자동으로 요일이 입력됩니다.

 

 

VBA 이용하여 엑셀 날짜 요일 자동 입력 방법

VBA를 이용하여 숫자(년도, 월, 일)를 입력하면 자동으로 표시되는 방법을 알아보겠습니다. 예를 들어 '20241122' 입력하면 '2024-11-22(금)'으로 자동으로 표시되는 방법입니다.

 

1. 적용할 시트 선택한 후 'Alt + F11' 단축키를 눌러줍니다.

 

2. VBA 코드 창이 열립니다. 화살표가 있는 부분에 아래 코드를 복사하여 붙여 넣기를 합니다.

3. VBA 코드입니다. 현재 A1 셀에 8자리 숫자를 입력하면 날짜로 변환되게 되어 있습니다. 다른 셀로 변경하고 싶다면 'A1:A10'을 부분만 고쳐 사용하면 됩니다. 파일첨부:

엑셀 vba.txt

0.00MB

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Cell As Range
    On Error Resume Next
    ' 변환 대상 셀 검사 (A2:A10 셀만 적용)
    If Not Intersect(Target, Me.Range("A2:A10")) Is Nothing Then
        For Each Cell In Target
            If Cell.Value = "" Then
                ' 셀이 비어 있는 경우 기본 서식을 유지하도록 설정
                Cell.NumberFormat = "General"
            ElseIf IsNumeric(Cell.Value) And Len(Cell.Value) = 8 Then
                ' 셀이 숫자이고 길이가 8자리인 경우
                Cell.Value = DateSerial(Left(Cell.Value, 4), Mid(Cell.Value, 5, 2), Right(Cell.Value, 2))
                ' 사용자 지정 서식 적용
                Cell.NumberFormat = "yyyy-mm-dd(aaa)"
                ' 자동 열 너비 조정
                Cell.EntireColumn.AutoFit
            End If
        Next Cell
    End If
    On Error GoTo 0
End Sub

 

4. VBA 코드를 붙여 넣기 한 후 'Alt + Q' 키를 눌러 VBA 코드 창을 닫아 줍니다.

 

5. A2 셀에 8자리 숫자를 입력하면 자동으로 'yyyy-mm-dd(aaa)' 변환화여 입력됩니다.

 

마무리

지금까지 서식과 VBA를 사용하여 엑셀 날짜 요일 같이 표시되는 방법을 알아보았습니다. 간단한 것은 서식을 활용하여 입력하면 되는데요. '-'를 입력해야 하는 부분이 조금 불편합니다.

 

사용하는 엑셀 문서에 따라 다르지면 상황에 맞게 사용하시면 좋을 것 같습니다. 오늘 하루도 즐겁게 퇴근하시기 바랍니다.