Új hozzászólás Aktív témák

• #35201 Delila_1 veterán n42 #35200

  Új Válasz 2017-05-15 06:21:58 #35201

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz n42 #35200 üzenetére

  A makrót a laphoz kell rendelned (a Téma összefoglaló szerint).

  A munka kezdésekor beírsz valamit az A1 cellába, az A2-ben megjelenik az idő, dátummal. A munka befejezésekor B1 cellába írsz, ekkor a B2-ben jelenik meg a pontos idő. Amelyik cellában az eltelt időt akarod látni, beírod a képletet: =B2-A2. Itt a formátum a cellaformázásnál az idő kategóriában az első (13:30:55) legyen.

  Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address = "$A$1" Then Range("A2") = Format(Now, "yyyy.mm.dd hh:mm:ss")
If Target.Address = "$B$1" Then Range("B2") = Format(Now, "yyyy.mm.dd hh:mm:ss")
Application.EnableEvents = True
End Sub

Új hozzászólás Aktív témák