< návrat zpět

MS Excel


Téma: Přidání datumu do makra rss

Zaslal/a 12.7.2020 14:21

FantasykZdravím hackeři 1
mám kód:
Dim datax As Range
Set datax = Sheets("Archív").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
Sheets("Program").Range("A7:E7").Copy Destination:=datax
Set datax = Nothing


zapisuje vše jak má, ale potřeboval bych aby do "Archívu" zapisoval vždy do F aktuální datum a čas - kdy kliknu na tlačítko..

Díky za jakoukoliv pomoc

Příloha: zip47257_kardex-v.0.1.xlsm.zip (31kB, staženo 14x)
Zaslat odpověď >

#047258
Stalker
Dim datax As Range
Set datax = Sheets("Archív").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
Sheets("Program").Range("A7:E7").Copy Destination:=datax
datax.Offset(, 5).Value = Format(Now, "dd.mm.yyyy hh:mm:ss")
Set datax = Nothing
citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse