Loop maken om datums aan te passen in Excel met WORKDAY of NET.WORKDAY

[nicewaether]

Hallo allemaal,

Ik kan een beetje overweg met VB maar loop nu tegen een probleem aan waar ik niet mee weg kom.

In kolom A staat een datumfrequentie, bijvoorbeeld W(week), M(Maand), J, HJ en Kw.
In kolom B staat een vervaldatum.
In Kolom C staat de volgende vervaldatum.
Op Tabblad 2 staan de "Holidays".

Als de datum die in kolom B staat gelijk is aan vandaag (of er eventueel voorbij is) moet deze verhoogd worden met de frequentie die staat vermeld in kolom A, de datum in kolom C moet dan ook met dezelfde frequentie verschuiven. E.e.a. rekening houdend met datums die in de "Holiday"tabel staan en het moet natuurlijk een Workday zijn.

Dus voorbeeld: Cel A3 = M
Cel B3 = 22-09-2010 zou dan 22-10-2010 moeten worden
Cel C3 = 22-10-2010 zou dan 22-11-2010 moeten worden

en deze afvraging dient dan tot de laatste regel steeds plaats te vinden.

Als iemand mij hiermee zou willen helpen, vast ontzettend bedankt.

Bert

 

[Mark xl]

kijk maar eens naar de functie "DateAdd"

'Kijk in VB help voor de syntax van DateADD
'bijvoorbeeld:
Sub test()
date1 = DateAdd("M", 1, "22-09-2010")
date2 = DateAdd("M", 1, "22-10-2010")
MsgBox date1
MsgBox date2
'oftewel
End Sub

als je problemen krijgt met datumconversie kijk dan in VBhelp bij de functie format, of probeer de werkbladfunctie TEKST()

 

[nicewaether]

Mark bedankt, maar het is niet waar ik mee zit. Ik heb geen datumproblemen maar meer hoe ik de loop moet maken.

 

[Mark xl]

Bert,

Ik denk dat je het beste een voorbeeldbestandje kunt posten met een paar rijen die bewerkt moeten worden, en een voorbeeld van je holiday tabel.

 

[nicewaether]

Beste Mark,

Excuses voor de wat late reactie. Ik was een aantal dagen in het buitenland.
Aanstaande dinsdagavond zal ik e.e.a. even in dit forum zetten. Ben nu moe en
ga zzzzzzzzzzzzzzzz.

Dank en vr gr

Bert

 

[nicewaether]

Beste Mark,

Excuses voor de wat late reactie. Ik was een aantal dagen in het buitenland.
Aanstaande dinsdagavond zal ik e.e.a. even in dit forum zetten. Ben nu moe en
ga zzzzzzzzzzzzzzzz.

Dank en vr gr

Bert

Mark, wederom excuses. Ik zit met een vervelende familie aangelegenheid en moet daarom constant naar het buitenland. Ga het voorbeeld zo snel mogelijk laten zien.
Bert