지금 설정 했으므로 셀 데이터가 변경되면 날짜가 업데이트됩니다. 통합 문서를 새로 고치면 셀 내용을 수정하지 않은 경우에도 날짜도 업데이트됩니다.
셀 내용을 수정 한 경우에만 날짜를 업데이트하고 싶습니다. CSV 파일에서 데이터를 가져 와서 가끔씩 새로 고쳐야합니다. 셀이 실제로 수정 된 날짜 만 표시하도록이 문제를 어떻게 해결합니까?
현재 이와 같은 공용 기능이 설정되어 있지만 작동하지 않습니다.
Public Function worksheetChange(ByVal Target As Range)
If Not Application.Intersect(Target, [D4]) Is Nothing Then [L4] = Date
End Function
워크 시트를 새로 고치고 셀을 수정하지 않은 경우에도 날짜가 업데이트됩니다.이 문제를 해결하려면 어떻게해야합니까?
편집 : 나는이 유형의 VBA 코드를 생각해 냈지만 어떻게 작동하는지 잘 모르겠습니다.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, [D4]) Is Nothing Then
If Not ActiveWorkbook.RefreshAll Then [L4] = Date
End Sub
돌이켜 보면이 코드는 응용 프로그램이 교차하지 않으면 D4를 사용하고 통합 문서가 새로 고쳐지지 않으면 L4를 오늘 날짜로 업데이트 함을 의미합니다.
감사합니다.
링크 참조
Dim oldValue
Public Sub Worksheet_SelectionChange(ByVal Target As Range)
oldValue = Target.Worksheet.Range("D4").Value
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Target.Worksheet.Range("D4")) Is Nothing Then
If oldValue <> Target.Worksheet.Range("D4").Value Then
Target.Worksheet.Range("L4").Value = Date
End If
End If
End Sub
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다