arkadaşlar kullandığım sayfada hücrelerin hepsi formüllü veriyi başka sayfalardan alıyorlar hücrelerdeki veriler hergün değişiyor ancak kullandığım macro bu değişikliği algılamıyor değişikliği algılaması için ne yapabiliriz lütfen yardımlarınızı beliyorum
kodlar
kodlar
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [d1:d65536]) Is Nothing Then
Cells(Target.Row, "C") = Date
ActiveCell.Offset(1, 0).Select
ElseIf Not Intersect(Target, [h1:h65536]) Is Nothing Then
Cells(Target.Row, "G") = Date
ElseIf Not Intersect(Target, [n1:n65536]) Is Nothing Then
Cells(Target.Row, "M") = Date
ElseIf Not Intersect(Target, [r1:r65536]) Is Nothing Then
Cells(Target.Row, "Q") = Date
ElseIf Not Intersect(Target, [x1:x65536]) Is Nothing Then
Cells(Target.Row, "W") = Date
End If
End Sub
