• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

=(nu)

Status
Niet open voor verdere reacties.
D

Depant

Verenigingslid
Lid geworden
5 aug 2015
Berichten
238
Hallo allemaal,

Vorige week hebben jullie mij geholpen met mijn tijdsregistratie excel werkblad. Het is een perfecte oplossig geworden.
De hele registratie is echter gebaseerd op de functie =(nu). De fraudeurs :evil::evil: hebben echter in de smiezen dat ze ook de "eigenschappen van datum en tijd" kunnen veranderen:confused::confused:. Al die tijdsregistraties gaan naar 1 cel toe met =(NU)....
Kan ik in die ene cel nog iets anders maken. Iets met externe verbinding of zo...

Ben benieuwd of er nog iets tegen dit lek te vinden is....


Groeten Henk
 
Laatst bewerkt:
Waarom beveilig je de bewuste cellen niet tegen aanpassen van eigenschappen?
 
dank voor hulp

Hallo,

Alle "kloktijden"worden opgehaald in 1 cel.
Die cel kunnen ze ook niet bij. Ze veranderen gewoon de susteemtijd van de pc.
Daarmee verandert dus gewoon de tijd van is nu.

:confused:
 
Iets met een liniaal en handjes...
 
Hallo edmoor,

je bedoelt pen en papier...LOL

Das niet de bedoeling.:)
 
Nee, op de vingers tikken! ;)
 
op de vingers tikken

Hoi,

:thumb::thumb::thumb:

Helaas kan dat alleen als ik in de buurt ben.
Wij zijn van 6.00 tot 22.00 uur aan het werk:(:(:(


Ga ik niet redden LOL
 
Als ze local admin zijn kunnen ze iedere actie die je onderneemt weer ongedaan maken.
 
Had gedacht misschien extern ergens iets op te kunnen halen.
Ga de afdeling IT maar eens vragen of ze de "policy voorwaarden"van dat account kunnen aanpassen zodat het niet meer mogelijk is dat ze het veranderen.
 
Als ze in een AD omgeving zitten zou dat inderdaad via Group Policy geregeld moeten kunnen worden.
 
Laatst bewerkt:
Je kunt ook de tijd registreren door het van internet af te plukken.

met een UDF:
(gevonden op internet en aangepast)
Code: 
Function NU_UTC() As Date
    Dim UTCDateTime As String
    Dim arrDT() As String
    Dim http As Object
    Dim UTCDate As String
    Dim UTCTime As String
    Dim HR As Integer
    
HR = 2 'aanpassen naar lokale tijd refererend naar UTC

    Const NetTime As String = "https://www.time.gov/"

    On Error Resume Next
    Set http = CreateObject("Microsoft.XMLHTTP")
    On Error GoTo 0

    http.Open "GET", NetTime & Now(), False, "", ""
    http.send

    UTCDateTime = http.getResponseHeader("Date")
    UTCDate = Mid(UTCDateTime, InStr(UTCDateTime, ",") + 2)
    UTCDate = Left(UTCDate, InStrRev(UTCDate, " ") - 1)
    UTCTime = Mid(UTCDate, InStrRev(UTCDate, " ") + 1)
    UTCTime = DateAdd("h", HR, UTCTime)
    UTCDate = Left(UTCDate, InStrRev(UTCDate, " ") - 1)
    NU_UTC = DateValue(UTCDate) + TimeValue(UTCTime)
End Function
 
Als de gebruikers het nodig vinden de systeemtijd aan te passen zullen ze die functie ook niet gebruiken.
 
Nee inderdaad, de suggestie met liniaal zal vermoedelijk het meest effectief zijn!
 
Haha, inderddaad.
Het is wel een nette functie maar het uitschakelen van de mogelijkheid om de systeemtijd te wijzigen via de group policy in Active Directory zal het meest effectief zijn.
 
Dat lijkt me ook. Maar om toch een Excel antwoord te geven op de vraag of de systeemtijd omzeilt kan worden, biedt de oplossing met het UDF-je mogelijk toch nog enigszins meerwaarde aan dit draadje op een Excel-forum. :p
 
Daarom zei ik ook, het is wel een nette functie :)
 
Volgens mij kan je in bericht#11, elke site gebruiken.
Zolang de site maar geladen kan worden, en geen foutmelding geeft.
Elke site geeft een header met een datum terug.
Misschien kan je een quasi belangrijke site (eigen bedrijfssite) gebruiken, zodat het lijkt dat de site heel belangrijk is voor werking van de code :evil: en zo de saboteurs op het verkeerde been zetten.
 
Laatst bewerkt:
Hier 2 stukjes code waarmee de variabele HR in bericht#11 kan automatiseren
De BiasHour is het verschil tussen UTC/GMT tijd met de tijdzone (amsterdam = -1) en de zomer-/wintertijd (zomertijd = -1)

Code: 
[SIZE=1]Public Function BiasHourOutlook()
    With CreateObject("Outlook.Application").TimeZones.CurrentTimeZone
        BiasHourOutlook = (.Bias + .DaylightBias) / 60
    End With
End Function

Public Function BiasHourRegister()
    With CreateObject("WScript.Shell")
        BiasHourRegister = .RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\TimeZoneInformation\ActiveTimeBias") / 60
    End With
End Function[/SIZE]

Als je een lokale server hebt dan kan je daar ook de tijd vanaf halen, in plaats van het internet, zie http://www.vbaexpress.com/kb/getarticle.php?kb_id=199
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan