overlapping van 2 maanden

[Spiesse]

Beste forumisten,

voor een bestand zou ik graag het volgende bekomen:

vanuit de atelier krijg ik een start- en einddatum. in het voorbeeld gebruik ik 28/8 tot 5/9
indien er een overlapping is van 2 maanden zou ik graag zien dat door middel van een macro op de volgende regel de eerste werkdag van de nieuwe maand ingevoerd wordt met de einddatum, dus in dit geval 3/9 en 5/9.

ik heb een bestand toegevoegd zodat jullie een zicht krijgen hierop.

wie zou me kunnen helpen?

groeten
spiesse

Bekijk bijlage overlapping maanden.xlsx

 

[Spiesse]

cobbe,

ik zie je reactie niet alhoewel ik een mail krijg

greets,
spiesse

 

[Cobbe]

Ik had een reactie gegeven zonder de vraag helemaal te lezen.

Ga nu naar een oplossing zoeken.

 

[Spiesse]

ik heb da ook soms dak te rap lees

ik ben benieuwd naar je oplossing

weet jij veel af van listboxen?

 

[Cobbe]

Ik ben er niet zeker van maar met een hulpkolom(E) heb ik een code in elkaar gestoken die, ik denk wel eens zou kunnen voldoen:

Private Sub Worksheet_Change(ByVal Target As Range)
 If Intersect(Target, Range("C2:C" & Range("C" & Rows.Count).End(xlUp).Row)) Is Nothing Then Exit Sub
   If Month(Target) = Month(Target.Offset(-1, 2)) Then
      If Target.Value <= Target.Offset(-1, 2) Then
         Target = Target.Offset(, 1)
      End If
    End If
End Sub

Van Listboxen weet ik niet meer af dan jij denk ik toch zo.
Maar er zitten toch welke enkel forummers tussen die daar heel goed mee overwegkunnen.

 

[Spiesse]

hey cobbe,

hij doet gedeeltelijk wat ik zoek alé, ik bedoel dat het correct is, lees niet verkeerd e

maar de bedoeling zou zijn dat de regel volledig gekopieerd wordt, en de 'van' datum de formuledatum auto meekrijgt...

zou dit mogelijk zijn?

 

[Cobbe]

Ik vrees dat je me het nog eens moet uitleggen, in je bestand misschien?

Maar nu moet ik naar de paardenrennen,(Oostende) de laatste keer dit jaar.

 

[Spiesse]

ok, enjoy the horses!

ik werk nog wel es een beter vb uit... probeer het vandaag nog te posten, anders morgenvroeg eerste werk.

greets
spiesse

 

[Spiesse]

cobbe, nog even proberen uitleggen...

ik heb dus een regel waarin de startdatum en de einddatum ingevuld wordt.
nu gebeurt het soms dat er een overlapping is van 2 maanden.
wat ik zou 'willen' is dat bij zo'n overlapping hetvolgende gebeurt:
de bovenliggende kolommen a, b en d worden gekopieerd
de eerste werkdag van de maand die overlapt wordt zou moeten in de 'van' kolom verschijnen, dus kolom c
op die manier sluit ik een belangrijke procedure uit, of probeer ik die tenminste uit te sluiten

groeten en tot mails

spiesse

 

[koster1984]

Heb je wel vba nodig?
Je kan ook onderstaande formule in cel C3 zetten:

=ALS(MAAND(C2)=MAAND(D2);"";ALS(WEEKDAG(1&"-"&MAAND(D2)&"-"&JAAR(D2);2)=1;1&"-"&MAAND(D2)&"-"&JAAR(D2);(1&"-"&MAAND(D2)&"-"&JAAR(D2))+(8-WEEKDAG(1&"-"&MAAND(D2)&"-"&JAAR(D2);2))))

 

[Spiesse]

hey koster,

dank voor het meedenken...

ik vermoed dat ik wel vba zal nodig hebben, omdat ik telkemale in de c kolom een startdatum ingeef; het bestand dat ik gebruik telt +2000 regels...

dus de trigger zou moeten starten als de 2 periodes een maand overlappen, en zodoende de regel kopieren en me toelaten om op de regel daaronder gewoon verder te doen met ingave van start en einddatum

groeten
spiesse

 

[sylvester-ponte]

hallo Spiesse

een vraagje :
wanneer heb je een overlap van 2 maanden?
bv wanneer zijn er 2 maanden verstreken na 30 december

groet sylvester

 

[Cobbe]

Kijk maar eens of ik het goed begrepen heb.

 

[Spiesse]

hallo Spiesse

een vraagje :
wanneer heb je een overlap van 2 maanden?
bv wanneer zijn er 2 maanden verstreken na 30 december

groet sylvester

hey sylvester,
bedankt voor het meedenken alvast!
de overlapping van 2 maanden kan enkel voorkomen wanneer iemand de laatste dagen van een maand en de eerste dagen van de volgende maand afwezig zal zijn.
in uw voorbeeld kan dit bv zijn:
van 27/12/12 tot 5/1/13

groeten
spiesse

 

[Spiesse]

Kijk maar eens of ik het goed begrepen heb.

cobbe. nog niet helemaal...

het kan bv zijn dat iemand anders een startdatum heeft van 28/08 en einddatum van 30/08. in dit geval mag er dus niks gebeuren.
het is enkel wanneer een nieuwe maand start tussen start en einddatum dat de regel moet gekopieerd worden en de eerste werkdag van de nieuwe maand als startdatum moet gebruikt worden, maar de zelfde einddatum als de regel waarin de overlapping gebeurt...

nog es proberen?

ps hoe was de paardenkoers?

 

[Cobbe]

Als ik het nu nog niet begrepen heb zal het wel niet meer lukken, denk ik zo.


PS: Op de paardekoers was het prachtig weer en een fantastische sfeer.
En al mijn geld kwijt!! Gelukkig had mijn vrouw me niet te veel meegegeven.

 

[Spiesse]

cobbe,

ik heb in uw bestandje es geprobeerd het iets anders uit te schrijven...

ik zie dat in de d-kolom die verborgen is in uw bestand effectief de eerste werkdag van de nieuwe maand verschijnt. dat is dus prima!
nu zou die datum via de macro moeten verschijnen in de c-kolom en de einddatum van de regel erboven in de d- kolom...

man man... ik met mijn kronkels...

ps: je had toch geld mee hoop ik om te drinken?

greets,
spiesse

Bekijk bijlage Kopie van overlapping maanden(cobbe)-2.xlsm

 

[Cobbe]

Haha, eindelijk heb ik het begrepen, dat hoop ik tenminste.

Zie uitleg in bestand.

PS: Ik drink niet. (als ik zelf moet betalen)

 

[Spiesse]

hoera!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

da ist e waar zat je knoop? waarschijnlijk in mijn uitleg

ik ga da nu proberen integreren in mijn hoofdbestand

moest ik u ooit es tegenkomen trakteer ik

groeten
spiesse

ik ga het effe uitproberen op mijn bestand en als het oki is zet ik hem op opgelost

 

[Spiesse]

cobbe cobbe cobbe

aanvulling

als de einddatum in de volgende maand ligt, dan zou die moeten verplaatst worden naar de cel eronder, en op die plaats zou de laatste werkdag van de huidige maand moeten komen te staan

lukt da?

spiesse