
Izvorno postao
Smrt
Dakle upises u celiju datum
ondak mishem dodjes do choshka celija, kad ti se kursor pretvori u crni + tad kliknes i jednostavno razvuces u smjeru gdje oces da ti se ispisu datumi...
To će samo napraviti slijedno niz datuma, a on hoće da se današnji datum automatski upisuje kad on nešto promijeni u stupcu.
Njemu treba nešto ovakvo:
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Then Exit Sub
If Target.Row = 1 Then Exit Sub
If IsEmpty(Target(1)) Then Exit Sub
If IsEmpty(Target.Offset(0, -1)) Then
Target.Offset(0, -1) = Date
Target.Offset(0, -1).NumberFormat = "yyyy-mm-dd"
End If
End Sub
Konkretno, ova skripta upisuje današnji datum u prvi stupac ako se nešto promijeni u drugom stupcu.
Bookmarks