이전 행이 비어있는 경우 현재 날짜 자동 채우기

Question

날짜별로 정렬 된 스프레드 시트가 있습니다. 매일 새로운 데이터를 입력합니다. 매일 다음 날 시작하기 전에 한 행을 비워 둡니다. 예 :

20.09.12 XXXXX XXXXX XXXXX XXXX 
     XXXXX XXXX XXXXX XX 
     XX XXXXX XX XXXX 

21.09.12 XXX XXXXX XXX XXXX 
     X  XXXX XXXX XXX 

22.09.12 XXXX XX XXXX XXXX 

그래서 내가 하나의 빈 행 후 데이터를 입력 할 때마다 항상 현재 날짜를 기입하는 엑셀 원하지만 확실히 날짜가 동일하게 유지하여야한다 - 나는 엑셀을 열 때마다 현재 날짜로 업데이트 할 수 없습니다. 나는 엑셀 2007을 사용 중이며 비 vba 아이디어가 선호되는 반면 vba는 문제가되지 않는다.

Answer 1

워크 시트의 Worksheet_Change 이벤트를 사용하여 VBA로 처리하는 방법은 매우 간단합니다. 그래서, 열 A에 오늘 날짜를 박았

효과적으로, 당신이 그것을 확인하는 셀을 변경할 때마다 오늘 날짜를 삽입하기위한 바로 가기가 있습니다

Private Sub Worksheet_Change(ByVal Target As Range) 
    If WorksheetFunction.CountA(Rows(Target.Offset(-1, 0).Row)) = 0 Then 
     Range("A" & Target.Row) = Format(Now(), "dd.mm.yy") 
    End If 
End Sub 

Answer 2

, 전체 행 위 비어 있는지 확인하고 : Ctrl;
바로 가기를 사용하면 매크로가 필요하지 않을 것 같습니다. 시간

유사 바로 가기 시프트Ctrl 키이다;