per jaar dagen m d w d v z z automatisch aanpassen

[Sytse1]

Voor een aantal medewerkers wordt elk jaar een nieuw tabblad gemaakt waarin vakantie ziekte e.d. geregistreerd wordt.
Ook voor al deze medewerkers moet ook een totaal overzicht per jaar gemaakt worden.
In het totaal overzicht staat de verwijzing naar het persoonlijke tabblad.
Nu wijzigt elk jaar de dag ten opzicht van de datum. B.v. 1 januari 2018 is op een maandag en in 2019 is dat een dinsdag.
In 2020 is dit een woensdag en tevens een schrikkeljaar.

Op welke wijze zou ik de vermelding van de dagen in het tabblad kunnen automatiseren.
Op 1 regel staat de nummers van 1 t/m 31
de maand vermelding staat in kolom A. Onder elk nummer staat dan afhankelijk van het jaar de dag als m(aandag) enz.
Bijv: 2018
januari
1 2 3 4 5 6 7
m d w d v z z

De maandnummers blijven altijd staan maar de dag wijzigt zich elk jaar.
Er moet ook met een schrikkeljaar rekening gehouden worden.
De betreffende dag verwijzing in de cellen zouden jaarlijks door het invullen van het jaar b.v. 2020 automatisch gewijzigd worden.
Is hier een oplossing voor?
b.v.d. voor het meedenken.
Sytse

 

[Peter B]

Ik denk dat een voorbeeld zal hebben om tot een goede oplossing te komen

 

[Sytse1]

Bekijk bijlage Test Verlofkaart 2019.xlsm

Bijgaand mij test bestand.

 

[edmoor]

Een reuzehandig met wachtwoord beschermd test bestand.

 

[snb]

Gelukkig heeft ieder Excel werkblad iets meer dan 366 kolommen
En het lukt de meeste bedrijven in Nederland ook nog wel aan iedere medewerker een rij toe te kennen.

Verander het jaar in cel A1 maar eens.

dan is dit voldoende

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then Cells(1, 2).Resize(, 366) = [transpose(Text(--date(A1,1,row(1:366)),"[$-413]ddd" & char(10)&"dd-mm"))]
End Sub

 

[Sytse1]

Ed Moor,

Stom van mij. Niet aan gedacht.
Nieuwe ronde.Bekijk bijlage Test Verlofkaart 2019.xlsm

SNB,

vast bedankt. Ik ga het bekijken.

Sytse

 

[Sytse1]

SNB,
Het bijgesloten bestand bekeken.
Inderdaad een mooie vba code die ook uitstekend werkt.
Alleen een heel jaar op 1 regel vindt ik wat onoverzichtelijk.
Bijgaand voorbeeld is op 1 regel is max 31 dagen.
Dan 2 lege regels waar de afwezigheid met een code en het aantal uren vermeld kan worden.
Daarna de volgende maand

Wellicht is de VBA code hiervoor aan te passen.

 

[snb]

Jij hebt blijkbaar een ander woordenboek dan ik: bij mij betekent 'overzichtelijk' heel iets anders dan wat jouw plaatje toont.
Daar kom je vanzelf achter als je 'de VBA code daarvoor aanpast'.

 

[Sytse1]

Wellicht is mijn overzichtelijk anders. Ik ben van mening dat overzichtelijk is, in 1 venster het totale jaaroverzicht tonen.
Mijn vba is vwb het werken met Excel gering. Maar ik gat het proberen.