Functie =geheel

[don42]

Beste alle allemaal,

wie kan mij een stukje op weg helpen?
Ik ben op zoek naar de functie =geheel in vba
ik gebruik nu

=GEHEEL(DATUMVERSCHIL(D2;E3;"d")/7/24)*24

dit zou ik graag voor cel L24 in vba hebben
de functie WorksheetFunction.Trunc() zou dit moeten kunnen maar ik kom er niet uit
wie weet hoe het wel moet

Don

 

[edmoor]

In VBA maak je er een Integer van met de Int() functie.

 

[don42]

Oke dat is heel andere koek daar moet ik even gaan bekijken
wil eigenlijk weten hoe vaak het gehele getal 24 in een bepaalde waarde kan
is dat int niet iets om af te ronden of zit ik daar fout mee?

 

[edmoor]

De Int functie converteerd een getal met cijfers achter de komma naar een geheel getal.
Bijvoorbeeld: Int(10.7) zal worden afgerond naar 10.
Hij zal dus altijd naar beneden afronden.

 

[don42]

Ik heb echt alles geprobeerd maar kom er niet uit.
ik heb een klein voorbeeld gemaakt
zou de formules in cel c3 en c4 graag in vba hebbenBekijk bijlage datumverschil.xlsx
als het datum verschil groter is als 24 weken moet de roulering opnieuw beginnen

Don

 

[edmoor]

Je plaatst een .xlsx document. Dat kan geen VBA code bevatten en is er dus niet te zien wat je al hebt gedaan en dan is ook niet aan te geven waar je de fout in bent gegaan.

 

[don42]

Met VBA code

Hoi EdMoor,

Ik heb het werkend
dankzij die int functie
wil jij er aub nog eens naar kijken en je mening geven

Bekijk bijlage datumverschil.xlsm
Don

 

[edmoor]

Je bedoelt dit?
Bekijk bijlage datumverschil.xlsm

Edit:
Zie net pas je eerdere bericht.
Vergelijk het maar eens met de mijne.

 

[don42]

EdMoor,

ja dat van jou ziet er veel overzichtelijker uit
dat ga ik dan ook gebruiken
dank je wel je hulp

ps

Dim LastRow As Integer
    LastRow = Range("A65536").End(xlUp).Row

Dit moest ik nog even toevoegen aan jouw code maar dat had weinig of niks met je oplossing te maken

helemaal goed