• 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.

uren verschil berekenen in een formule

Status
Niet open voor verdere reacties.
plainme

plainme

Gebruiker
Lid geworden
10 okt 2009
Berichten
309
Amici,

we zijn hier al weer met een ander vraagje ( tijd genoeg nu... thuis om te recupereren van operatie zodoende ... :) )

Kan er mij iemand zeggen hoe ik in een formule tijd kan berekenen
mijn formule ziet er als volgt uit
in cel I§ komt een uur te staan. Wanneer dit groter is dan 08:00 dan dient deze alles wat hoger is dan 08:00 in cel K6 te plaatsen.
VB CEL I6 10:30 dan dient er in Cel K6 02:30 komen te staan, en de cel C6 te reduceren naar 08:00

enig idee?

Alvast bedankt,

Mvg
Marc
 
Denkwijze even omdraaien. Komt geen formule in I6, maar eentje in K6:
Code: 
=MAX(I6-8/24;0)
C6 snap ik niet wat je mee wilt. Plaats s.v.p. een voorbeeldje.
 
Beste Alex,

Bestandje is te groot en bevat te veel data om dit hier te gaan bewerken. Mijn excuses en graag begrip hiervoor.
( Zoveel tijd heb ik nu ook weer niet, of is het nu geduld??? :d:d:d )

Ik kijk even om dit toch aan te passen en plaats dit dan hier.

Graag wat tijd hiervoor.

Toch al bedankt.

Mvg
Marc
 
Zou niet in je originele bestand gaan zitten rommelen. Een representatief voorbeeldje is genoeg, dat hoeft niet veel tijd te kosten.
 
Amici,

Is een idee hoe ik het voor ogen heb.
Mochten er hier nog vragen omtrent, en geloof me die zullen er zeker zijn :cool::cool:, dan hoor ik deze graag.
 

Bijlagen

  • Helpmij V1.xlsm
    26,8 KB · Weergaven: 49
Amici,

Niemand die hier een idee voor geeft??? dit kan niet met al die superbreins hier :) :)

Graag dit even te willen bekijken aub zodat ik hier ook van kan genieten zoals van alles wat ik hier al heb gevraagd.

Alvast mijn dank.

Mvg
Marc
 
Hoe voor je de uren in dan? 10/00 is niet een erg gangbare notatie. Vul ook wat meer gegevens in het voorbeeldbestand in met de verwachte uitkomsten.
in C6 staat deze formule
Code: 
=1+INT((#REF!-DATE(YEAR(#REF!+4-WEEKDAY(#REF!+6));1;5)+WEEKDAY(DATE(YEAR(#REF!+4-WEEKDAY(#REF!+6));1;3)))/7)
lijkt mij weinig met de vraag in de OP te maken te hebben.
 
Beste VenA

Ik heb wat meer gegevens in het voorbeeldje geplaatst en wat opgeschoond.

Hopelijk kunnen jullie hier nu wat mee


Mvg,
Marc
 

Bijlagen

  • Helpmij V1-2.xlsm
    194,4 KB · Weergaven: 35
Ik niet. Dit is ook geen representatief voorbeeldbestand. Wat wil je nu? Iets met een Userform? Iets handmatig invoeren? Maak gebruik van kolomkoppen die eenduidig zijn met het formulier. Nu is het allemaal maar gissen.
 
Amici,

dan nu met een voorbeeld zoals het nu is . of toch een deel daarvan.
Het geheel bestrijkt dus een volledig jaar.

Dit is steeds terugkerend voor iedere maand.
Jan, Feb, Mrt, Apr, ....
Zie kader in het voorbeeld.


Alvast bedankt.

Mvg
Marc
 

Bijlagen

  • Helpmij V1-2.xlsm
    241,4 KB · Weergaven: 32
Amici,

Of de vraag is nog steeds niet duidelijk of het is moeilijker dan ik dacht.... maar het gebeurt zelden dat er geen reactie komt op een vraag.

Graag de oorzaak aub?

Alvast bedankt

Mvg
Marc
 
Graag de oorzaak aub?
Klik om te vergroten...
Onduidelijkheid.

Ik heb je voorbeeld wat vriendelijker voor het oog gemaakt, lijkt me genoeg om de vraag te beantwoorden. Vul nu eens voor een aantal rijen (handmatig) de gewenste uitkomsten in (zie ook #7), en waarom juist die uitkomst. Geen lange teksten a.u.b. Voorbeelden. Wat verwacht je van de gebruiker dat hij/zij invult, en welke cellen moeten berekend worden.

Een userform voor invoeren van een paar getallen lijkt me niet per se nodig.
 

Bijlagen

  • Helpmij V1-2 (AC).xlsx
    195,8 KB · Weergaven: 29
Laatst bewerkt:
beste Alexcel,

Dank voor de reactie.

in bijlage jou bestandje met gewenste.

Graag jullie mening.

Alvast bedankt

Mvg
Marc
 

Bijlagen

  • Helpmij V1-3.xlsx
    195,4 KB · Weergaven: 41
Amici,

Gewoon een reactie zodat deze weer bovenaan komt te staan.

Wat willen jullie nog meer weten inzake de uitleg.
Ik dacht het nu toch duidelijk genoeg is.

Mvg,
Marc
 
Beste Sylvester

Omdat je dan een kringverwijzing krijgt en dat dit geen resultaat oplevert zoals voor ogen.
Bedoeling is dat wanneer er in (in dit geval hier het vereenvoudigd voorbeeld ) in kolom I een uur invult dat hoger is dan 08:00 het teveel in kolom K terecht dient te komen. indien minder dan 08:00 dient dit te worden aangevuld in kolom L

VB gepresteerde uren ( kolom I ) 10:00 dient dit 08:00 te worden en automatisch in kolom K 02:00 komen te staan.
Wanneer in kolom K 06:00 dient in kolom L 02:00 te worden genoteerd. kan dit eventueel opgelost met een formule als K.. < 08:00 dan som is 08:00- kolom K..... of iets in die aard denk ik

Ale met alle respect maar beter dan dit kan ik het niet meer uitleggen.

Toch al alvast bedankt voor te reageren.
 
Zo? In de module van blad 'Voorbeeld'
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
t = 8 / 24
  If Not Intersect(Target, Range("I6:I47")) Is Nothing Then
    Application.EnableEvents = False
    Target.Offset(, 3) = IIf(Target.Value < t, t - Target.Value, "")
    If Target.Value > t Then
      Target.Offset(, 2) = Target.Value - t
      Target.Value = t
    End If
    Application.EnableEvents = True
  End If
End Sub
 
Hallo VenA,

Deze werkt ! super! hartelijke dank.

Nog een vraagje ... gezien dat het bestand vereenvoudigd is door AlexCel gaat dit ook moeten gebeuren voor de
kolom I6 -> I47 T6 -> T47 AE6 -> AE47
Kolom I53 -> I94 T153 -> T94 AE53 -> AE94
Kolom I100 -> I141 T100 -> T141 AE100 -> AE141
Kolom I147 -> I188 T147 -> T188 AE147 -> AE 188

Zie voorbeeld #10 zoals het nu is dit is een volledig jaaroverzicht.
Vandaar de opsomming van alle kolommen waar dit op van toepassing is.
Maak ik een copij van dat scriptje en pas ik dit aan naar alle kolommen of hoe moet ik het zien?

Nogmaals mijn dank voor het werkende voorbeeld.


Mvg,
Marc
 
Wat denk je dat deze regel doet?
Code: 
If Not Intersect(Target, Range("I6:I47")) Is Nothing Then
Misschien even de range aanpassen?
 
die regel klopt maar wat doe ik dan met de andere kolommen die moeten ingevuld worden?
De regel die je nu implementeert spreekt voor de maand januari.
maar je hebt ook nog februari maart april juni juli aug sept okt nov dec.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan