본문 바로가기

엑셀에서 매월 첫날 또는 마지막 날 자동으로 입력하기

초보초보 블로거 발행일 : 2023-09-24
엑셀에서 매월 첫날 또는 마지막 날 자동으로 입력하는 방법에 대해 알려드리겠습니다. 엑셀에서는 "=TODAY()" 함수를 사용하여 현재 날짜를 가져올 수 있습니다. 이 함수를 활용하여 "=DATE(YEAR(TODAY()),MONTH(TODAY()),1)"과 같이 입력하면 매월 첫날의 날짜를 자동으로 입력할 수 있습니다. 마찬가지로 "=EOMONTH(TODAY(),0)"과 같이 입력하면 매월 마지막 날짜를 자동으로 입력할 수 있습니다. 이렇게 설정된 수식을 해당 셀에 입력하면, 매월 첫날 또는 마지막 날을 자동으로 업데이트하게 됩니다. 이 방법을 통해 엑셀에서 간편하게 매월 첫날 또는 마지막 날을 입력할 수 있습니다.





엑셀에서 매월 첫날 또는 마지막 날 자동으로 입력하기 caption=




1. 엑셀 함수를 활용한 매월 첫날 자동 입력

엑셀 함수를 활용하여 매월 첫날에 자동으로 입력하는 방법은 다음과 같습니다:

1. 날짜 함수 사용: 엑셀의 "TODAY" 함수를 사용하여 현재 날짜를 가져옵니다. 이 함수는 매일 업데이트되므로, 이를 활용하여 매월 첫날을 찾을 수 있습니다.
- 예제: =TODAY() --> 2022-01-30

2. "DATE" 함수 사용: "DATE" 함수를 사용하여 현재 날짜의 연도와 월을 가져와, 첫날을 생성합니다.
- 예제: =DATE(YEAR(TODAY()), MONTH(TODAY()), 1) --> 2022-01-01

3. 매월 첫날을 입력할 셀 선택: 비어있는 셀을 선택한 뒤, 위에서 얻은 "DATE" 함수의 결과를 입력합니다.
- 예제: B1 셀에 위의 "DATE" 함수를 입력하여, B1셀의 값이 매월 첫날로 설정됩니다.

4. 자동 입력 설정: 위의 단계를 수행한 후, 해당 셀을 복사한 뒤 다른 셀에 붙여넣기 합니다. 엑셀은 자동으로 다음 셀에 연속적인 날짜를 입력할 것입니다.
- 예제: B1셀을 선택한 후, 해당 셀 우측 하단의 작은 사각형을 클릭한 다음, 다른 셀로 드래그하여 복사합니다.

이렇게 하면 엑셀에서 매월 첫날을 자동으로 입력하는 것이 가능합니다. 이 방법을 활용하면 월별 또는 연도별 데이터 정리 등의 작업을 효율적으로 수행할 수 있습니다.


2. 엑셀 함수를 활용한 매월 마지막 날 자동 입력

매월 마지막 날 자동 입력은 엑셀의 함수를 통해 간단하게 처리할 수 있습니다.

한글로 작성하여 설명드리면, 다음과 같습니다:

1. 현재 날짜를 구합니다. (오늘 함수: =오늘())

2. 현재 날짜에서 달의 마지막 날을 계산합니다. (EOMONTH 함수: =EOMONTH(오늘(), 0))

3. 위에서 구한 값에 원하는 값을 입력합니다.

예를 들어, "A1" 셀에 매월 마지막 날에 입력하고 싶은 값이 있다면, "A1" 셀에 다음과 같은 수식을 입력하면 됩니다:

=IF(DAY(오늘())=DAY(EOMONTH(오늘(), 0)), 원하는 입력값, "")

위 수식은 현재 날짜의 일자와 현재 달의 마지막 날을 비교하여 같으면 원하는 입력값을 반환하고, 다르면 빈 문자열을 반환합니다.

이렇게 설정하면, 매월 마지막 날에 자동으로 입력하고자 하는 값이 "A1" 셀에 등록됩니다. 원하는 셀이나 입력값에 따라 적절히 수정하여 사용하면 됩니다.


3. VBA 매크로를 활용한 매월 첫날 자동 입력

VBA 매크로를 활용한 매월 첫날 자동 입력은 주어진 조건에 따라 엑셀 시트에 일정한 작업을 자동으로 수행하는 기능입니다. 이를 통해 매월 첫날에 발생하는 반복 작업을 자동화할 수 있습니다.

아래는 VBA 매크로를 활용한 매월 첫날 자동 입력의 예시 코드입니다.

```vba
Sub 매월첫날자동입력()
Dim 현재월 As String
Dim 이전월 As String
Dim 첫날날짜 As Date
Dim rng As Range

' 현재 월과 이전 월을 변수에 저장
현재월 = Format(Date, "yyyy년 mm월")
이전월 = Format(DateAdd("m", -1, Date), "yyyy년 mm월")

' 첫날 날짜를 변수에 저장
첫날날짜 = DateSerial(Year(Date), Month(Date), 1)

' 시트를 활성화하고 원하는 작업 수행
Sheets("시트명").Activate

' A1 셀부터 마지막 비어있는 셀까지 찾아서 변수에 저장
Set rng = Range("A1").End(xlDown).Offset(1, 0)

' 첫날 날짜를 A열에 입력
rng.Value = 첫날날짜

' B열에 현재월 입력
rng.Offset(0, 1).Value = 현재월

' C열에 이전월 입력
rng.Offset(0, 2).Value = 이전월
End Sub
```

위 코드는 매월 첫날에 실행하면 "시트명" 시트의 A열에 첫날 날짜, B열에 현재 월, C열에 이전 월을 입력하는 예시입니다. 필요에 따라 코드를 수정하여 원하는 작업을 수행할 수 있습니다.

VBA 매크로를 활용하면 매월 첫날 자동 입력 작업을 자동화하여 시간과 노력을 절약할 수 있습니다.


4. VBA 매크로를 활용한 매월 마지막 날 자동 입력

VBA(Virtual Basic for Applications) 매크로를 활용하여 매월 마지막 날 자동 입력을 수행하는 방법에 대해 설명하겠습니다.

1. 먼저, VBA 매크로를 실행할 엑셀 파일을 열어줍니다.
2. 시트에는 입력할 데이터가 있는 범위를 설정해야 합니다. 예를 들어, A열부터 D열까지 매월 데이터를 입력한다고 가정하겠습니다.
3. "개발" 탭을 선택하고, "Visual Basic"을 클릭하여 VBA 편집기를 열어줍니다.
4. 편집기 창에서 시트 이름을 클릭하고, 원하는 이벤트를 선택하는 부분에서 "Worksheet"를 선택합니다.
5. "Worksheet_SheetActivate" 이벤트를 선택한 후, 다음 코드를 입력합니다:

```vba
Private Sub Worksheet_Activate()
Dim LastDate As Date
Dim rng As Range

' 데이터를 입력할 범위를 지정합니다. 예시에서는 A열부터 D열입니다.
Set rng = Range("A:D")

' 현재 월의 마지막 날을 구합니다.
LastDate = DateSerial(Year(Date), Month(Date) + 1, 0)

' 오늘 날짜가 해당 월의 마지막 날인 경우 데이터를 입력합니다.
If Date = LastDate Then
rng.ClearContents ' 이전에 입력된 데이터를 삭제합니다.
rng.Value = "자동 입력된 데이터" ' 원하는 데이터로 수정합니다.
End If
End Sub
```

6. 코드를 입력한 후, VBA 편집기를 닫습니다.
7. 시트를 선택할 때마다 VBA 매크로가 실행되어 오늘 날짜가 해당 월의 마지막 날인 경우, A열부터 D열까지의 데이터를 자동으로 입력합니다.

이제 매월 마지막 날 데이터를 자동으로 입력할 수 있는 VBA 매크로를 사용할 수 있습니다. 필요에 따라 코드를 수정하여 원하는 데이터를 입력하도록 변경할 수 있습니다.


5. 조건부 서식을 활용한 매월 첫날 또는 마지막 날 자동 입력

조건부 서식을 활용하면 매월 첫날 또는 마지막 날 자동 입력할 수 있습니다.

1. 첫날 자동 입력

- "날짜" 서식을 사용하여 현재 월의 첫날을 표시합니다.
- 예를 들어, "=날짜(년,월,1)" 공식을 사용하면 현재 월의 첫날이 자동으로 입력됩니다.
- 이후 필요한 내용을 작성하면 매월 첫날에 자동으로 해당 내용이 입력됩니다.

2. 마지막 날 자동 입력

- "날짜" 및 "eomonth" 함수를 조합하여 현재 월의 마지막 날을 표시합니다.
- 예를 들어, "=eomonth(오늘(),0)" 공식을 사용하면 현재 월의 마지막 날이 자동으로 입력됩니다.
- 이후 필요한 내용을 작성하면 매월 마지막 날에 자동으로 해당 내용이 입력됩니다.

조건부 서식을 활용하여 매월 첫날 또는 마지막 날에 자동 입력하기 위해 위와 같은 방법을 사용할 수 있습니다. 이를 통해 일일적인 반복 작업을 줄이고 효율적인 업무 처리가 가능합니다.


관련 뉴스기사

관련 유튜브 영상

엑셀 1부터 100000까지, 순번 매기기 - 1초 해결 방법⚡(날짜도 됩니다!)

연관 검색어

댓글