elk uur 1 bij waarde optellen

[Excelproblem]

hoihoi,

nog een vraagje om te beantwoorden:

Ik heb in cel A1 een waarde staan. (bijv. 51). nu is het de bedoeling dat dmv een macro ofzo, deze waarde elk uur met 1 omhoog gaat (na 1 uur dus 52, na 2 uur 53).
Hoop datie duidelijk is?

Groetjes Excelproblem

 

[edmoor]

En als het document wordt afgesloten en 4 uur later weer wordt geopend? Moet er dan op dat moment direct 4 bij worden opgetelt? Of geldt het alleen als het document open is?

 

[Excelproblem]

nou het zit eigenlijk zo: het document moet tellen tussen 8 uur 's ochtends en 8 uur 's avonds. Het is dus de bedoeling dat hij alleen telt als het tussen 8 en 8 is. dus als het acht uur 's avonds is, niet meer optellen, maar volgende ochtend acht uur 1 tel erbij.

 

[ExcelAmateur]

Excelproblem,

Ik weet niet of het zo zal werken, ben geen specialist in VBA maar test het en je weet het.

 

[Niels28]

waarom een macro?
zo kan het toch ook?

=AFRONDEN(NU()-DATUM(2015;3;3);0)*12+ALS(OF(UUR(NU())<20;UUR(NU()>8));UUR(NU())-8;12)

Niels

 

[sylvester-ponte]

Niels, als je ipv Afronden Geheel gebruikt dan wordt de dagen bijtelling pas om 24:00 uitgevoerd ipv om 12:00

 

[Niels28]

Dank je,

weer wat geleerd, vond het al zo vreemd dat ik voor 12 uur een andere uitkomst had

Niels

 

[Excelproblem]

thanx. opgelost

 

[Niels28]

gewoon uit schieuwnierigheid welke heb je nu gebruikt?

Niels

 

[Excelproblem]

Heb de formule (geheel) gebruikt. Heb zelf ook niet zoveel verstand van vba. Alleen wil ik nu in cel A2 de tijd weergeven tussen 8 en 8 (wat nog niet lukt)

 

[Niels28]

wat lukt er niet dan? en wat heb je als formule?

Niels

 

[ExcelAmateur]

Hier een bestandje met de formule van "Niels28" werkt volgens mij perfect.
Heb er ook de tijd ingezet.

 

[Excelproblem]

Heb het iets anders gedaan:
in cel A2 waar klokje moest komen staat nu
=ALS(REST(A1;12)<>0;NU();"")

 

[ExcelAmateur]

De formule is een stuk korter en werkt goed.:thumb:

 

[Excelproblem]

nog 1 vraag: stel dat de teller en klok moeten lopen tussen 9 en 9 ('s ochtends om 9 uur gebeurt er niets, 's avonds om 9 uur verspringt teller wel 1 omhoog). wat moet er allemaal aangepast worden aan formule. (Ik snap hem niet )

 

[Niels28]

bedoel je dit?

=GEHEEL(NU()-DATUM(2015;3;3);0)*12+ALS(OF(UUR(NU())<21;UUR(NU()>9));UUR(NU())-9;12)

Niels

 

[Excelproblem]

Ja dankje

 

[snb]

Is dit nog iets ?

=12*(TODAY()-DATE(2015;3;3)) +INT(MOD(NOW()-3/8;1)*24)