Excel - osveži datum, če je sosednja celica spremenjena

Chimay

Fizikalc
22. jul 2007
1.518
14
38
37
Dolenjska
Zdravo,

Imam vprašanje glede excela:
Dnevno se ročno osvežuje tabela zaloge kosov z cca 140 vrsticami. Ne osvežijo se vse vrstice ampak samo posamezne.
Ali je možno nastaviti (in kako), da se avtomatsko osveži datum v celici Y, če je bila vrednost v celici X spremenjena?
 

gr69

Guru
15. dec 2009
11.581
2.628
113
še v SLO - ampak komaj
Macro (ni moj - malo predelan) - vpiše datum v stolpec A, če se v stolpcu B spremeni vrednost celice.

Pazi - sprememba je dokončna in ob "napaki" (tj. pomotoma spremenjen vnosu v "B"") "nepopravljiv" (ne dela CTRL+z "korak nazaj").

Private Sub Worksheet_Change(ByVal Target As Range)

'This will help to overcome errors when deleting selections of ranges:

On Error Resume Next

'If you change the value in column B:

If Target.Column = 2 Then

'If the end result of the change is not empty:

If Target.Value <> "" Then

Target.Offset(0, -1).Value = Date 'Gets the current date in cell to the left in column A

Target.Offset(0, -1).Value = Target.Offset(0, -1).Value 'Replaces the formula with its value

End If

End If

'To cancel the effect of On Error Resume Next

On Error GoTo 0

End Sub