IZBORNIK HOME FORUM ACCESS 2003 EXCEL 2003 WORD 2003  .
   
   
HOME
FORUM Win Tips&Tricks
   
KAKO INSTALIRATI
WINDOWS XP ?
Kako instalirati Win XP sa USB STICKA
Kako instalirati WINDOWS 7 ?
Naučite za 15 minuta raditi u Windows XP
Naučite Internet Explorer i Outlook Express
za 15 minuta
Kako kreirati BOOT CD za instalaciju Win95
   
MS OFFICE 2003
MS OFFICE 2007
   
   
HOME NETWORK
tutorijal za mreže
Network Windows 7 - XP
   
ZANIMLJIVI LINKOVI
BROJEVNI SUSTAVI
(DEC, OKT, BIN, HEX )
CMD - Command Prompt
CISCO - CCNA tutoriali
VLSM and SUBNETTING
   
Tutorijali za phpBB forum
JAVASCRIPT
VISUAL BASIC 6.0
AUTOCAD 2007
 
 
MICROSOFT EXCEL 2007 - Automatski datum nakon unosa podatka

Automatski datum i vrijeme nakon unosa podatka
Vremenska kontrola upisa podatka

Search This Web Site

Adsense sponzor



 




Kako vremenski kontrolirati kada je podatak unesen
(Nakon upisa podatka pojavljuje se automatski datum i sat unosa)

Ako ste ikada imali potrebu kontrolirati upis podatka u ćeliju pomoću tekućeg datuma i vremena pogledajte način na koji možete nakon unosa podataka imati prikazan datum i sat unosa podatka.

Uzmimo situaciju da se radnici prijavljuju putem mreže (ili na jednom računalu) u određenu datoteku i upisuju kada stignu na posao i odlazak s posla. Nakon upisa svog imena i prezimena automatski se pored pojavljuje datum i sat upisa podatka. Organizacija se može izvesti na više načina, ovdje su osnove a ostale estetske dijelove (protect dokumenta) prepuštam vama. Također pomoću TXT datoteke, kronološki možete pratiti sve korisnike koji su otvarali datoteku (ako se datoteci pristupa putem mreže).

Adsense sponzor



 

U stupcu B upisuju se radnici. Ostale ćelije su Locked. Svaka promjena u stupcu B u ćelijama bilježi se u stupcu C. Pa tako ako se i ispravljaju podaci ili ponovni unos. Ćelije u stupcu C formatirajte po želji.

Za ovo automatsko pamćenje vremena tj. tekućeg datuma i sata potrebno je slijedeći Macro snimiti u dotični radni list (Sheet)

Dakle kliknite desnom tipkom miša na Sheet "dolazak" => View Code => i u Windows Code umetnite ovaj Macro. Snimite Workbook i isprobajte.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("$B$2:$B$5")) Is Nothing Then
Target.Offset(0, 1).FormulaR1C1 = Now()
End If
End Sub

isto tako možete experimentirati sa ovim Macro kodom



Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column <> 1 Then Exit Sub
If WorksheetFunction.CountBlank(Target) > 1 Then Exit Sub
Target.Offset(0, 2) = Date & " " & Time
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count <> 1 Then Exit Sub
If Target.Column <> 1 Then Exit Sub
Target.Offset(0, 1) = Date & " " & Time
End Sub

ili možete koristiti ovaj Macro u Worksheet code module

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Count > 1 Then Exit Sub
If Not Intersect(Range("B2:B5"), .Cells) Is Nothing Then
Application.EnableEvents = False
If IsEmpty(.Value) Then
.Offset(0, 1).ClearContents
Else
With .Offset(0, 1)
.NumberFormat = "dd mmm yyyy hh:mm:ss"
.Value = Now
End With
End If
Application.EnableEvents = True
End If
End With
End Sub

Ako želite na jednom Sheetu imati Dolazak i Odlazak (organizacija podataka vama po želji) kao i kontrolu vremena tj. razliku između dva vremena (ugnijezdite je u IF funkciju) tada možete upotrijebiti 2x Macro iznad koji spojite u jedan uz izmjene  raspona ćelija.
Naravno ako želite zbrojiti vremena (sate) tada koristite AutoFilter i SUM preko 24 sata

Adsense sponzor




da bi se osigurali možete dodatno provjeriti kako se određeno računalo putem mreže spajalo i otvaralo datoteku. Kronološki pregled možete kreirati pomoću TXT datoteke a tutorijal pogledajte na linku kronološki pregled otvaranja datoteke kao i ovaj drugi tutorijal Tko je zadnji snimio Workbook sa kronološkim popisom


Adsense sponzor




©- 2006 - 2018 - IvanC  - Sva prava pridržana.  ic.ims.hr