Při změně bunky vlož datum Vyřešeno
Napsal: 15 bře 2019 06:26
Dobrý den, prosím o radu. Potřebuji makro, které při zmeně ve sloupci A1:A100 vloží datum do sloupce D1:D100, vždy do řádku kde došlo ke zmeně.
Děkuji.
Už jsem něco našel na webu Pavla Lasaka a funguje mi to.
jenom pro info přikládám.
Děkuji.
Už jsem něco našel na webu Pavla Lasaka a funguje mi to.
jenom pro info přikládám.
Kód: Vybrat vše
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
' zapsání do buňky
Application.EnableEvents = True
If Target.Column = 1 Then
i = Target.Row
Cells(i, 4).Value = Format$(Now, "dd/mm/yy hh:nn")
End If
End Sub