Pitufo,bedankt voor de matrix formule, is reeds aangepast.
Op uw vraag IVM opslaan is het van belang dat achter de datum de naam Selenium word toegevoegd omdat het verslag word uitgebreid naar de andere secties en deze dan achter de datum de naam Indium, Omnibus ,Telluur enz. krijgen (vandaar de toevoeging Selenium).hopelijk voldoende info anders vraag maar.


mvgLuc

Pitufo: Met mijn uitleg geraak je ook niet veel verder, nieuwe poging!!
Als het bestand word opgeslagen komt hij via ploegenboek 2014 (daarin staan de sub-mappen Selenium,Indium,Omnibus,Telluur enz.).
dit zijn secties waarin enkel het blad perso-BZM idem is aan dat van Selenium.
voor het opslaan moet hij dan de sub-map Selenium openen, daarna de sub-map juni2014 en daarin het bestand opslaan onder de datum (via de knop) met toevoeging van het woord Selenium vlak achter de datum-->vb.06-06-2014Selenium.
Als ik later de bladen wil koppelen word er enkel in de sub-mappen van de andere secties in de bladen perso-BZM de personen die aanwezig zijn opgehaald en toegevoegd aan het blad Selenium(hier moet jij geen rekening mee houden).
dus opslaan als-->= "E:\02. Productie BZM\D. ploegenboek\Ploegenboek 2014\Juni 2014\Selenium\"-->in deze sub-map moet hij de file opslaan als vb.06-06-2014Selenium.
ps:zo als je zie heb ik de sub-map 2014 reeds verwijderd (heb enkele mappen verplaatst).
Nu heb ik nog en vraag (misschien droom ik)als je de file opslaat de volgende maand maakt hij autm; de map aan??
ps:Ik raak stilaan het noorden kwijt!!



   mvg,Luc

Hallo Luc,

Nu heb ik nog en vraag (misschien droom ik)als je de file opslaat de volgende maand maakt hij autm; de map aan??
ps:Ik raak stilaan het noorden kwijt!!

Zolang je nog de andere windrichtingen weet zitten zou ik me geen zorgen maken 

Mag ik voor bovenstaande even verwijzen naar mijn uitspraak van al een tijdje geleden dat we jaar en datum gewoon uit de datum gingen nemen ?
Ik herinner me wel dat je toen ook al verbaasd opkeek 

Concreet : alle benodigde mappen worden in de bijgevoegde versie gecontroleerd op hun bestaan (zowel voor het jaar als de maand) en indien nodig gemaakt. Door de perikelen ivm de exacte mappenstructuur heb ik de vba-code wel op verschillende plaatsen moeten aanpassen, dus vooral de vorige terug overboord kieperen !
Ik ben wel blijven proberen ze zo eenvoudig mogelijk te schrijven zodanig dat je indien nodig zelf kan aanpassen.

't Is juist de laatste dag van de maand : dus als je je haast en vanavond nog eens test en dan morgen opnieuw kan je meteen zien dat het werkt  ... tenzij je verkiest "OF het werkt" 

Mvg,
pitufo

Dag Luc,

ik durf de mappen voor het opslaan niet aanpassen in de macro

In een vorig bericht gaf je als structuur voor de mappen aan :
"E:\02. Productie BZM\D. ploegenboek\Ploegenboek 2014\Juni 2014\Selenium\"
Alleen als dit opnieuw zou wijzigen moet de macro aangepast worden.

In het andere geval moet het devies luiden : er vooral NIET aan prutsen !

Mvg,
pitufo

Luc,

Dan denk ik eerder dat er iets anders, hopelijk eenmalig, aan de hand is geweest, want na de aanpassingen die je hebt gedaan (waar op zich niets fout in aan te treffen valt) doet de code al bij al nog identiek hetzelfde !

Mvg,
pitufo

Pitufo, Als ik de knop van uw macro bedien doet de macro niets.
ps.de aangepaste werkt perfect maar ik zie niet waarom uw macro niet werkt, maar het werkt zo is iedereen tevreden.
Nogmaals mijn dank voor de aangebrachte oplossing.


  mvg,Luc

Pitufo, Na aanpassen adres en nog 10x maal proberen werkt uw macro ook!!
PS niet dat ik twijfelde aan u, maar waarom hij daarvoor niet werkte is mij een raadsel, in ieder geval hij werkt iets onopgelost laten is niet mijn ding.
In bijlage de versie die waar ik het adres heb aangepast.
Iedereen tevreden denk ik, dit was een leuke ervaring-->weeral wat bijgeleerd.



mvg,Luc

Dag Luc, tijdje geleden... 

Ik heb het daarom ook even moeten herbekijken, want we hebben toen toch wel één en ander in elkaar gebokst...

Van zodra je het bestand opent (zowel een origineel als een kopie van een willekeurige datum) wordt er een procedure uitgevoerd die in eerste instantie de "huidige" datum in die cel zet. De rest van de procedure is wel aan condities gebonden maar het begin zal dus altijd gebeuren.

Wat we daarom moeten doen is kijken of de datum in die cel ook deze is die in de bestandsnaam staat, en als dat zo is de procedure daar onmiddellijk afbreken.

Dus zet gewoon dit als eerste regel in Sub Workbook_Open :

If DateValue(Left(ActiveWorkbook.Name, 10)) = DateValue(Sheets("Perso-BZM").Cells(3, 5)) Then Exit Sub
En dan natuurlijk maar hopen dat het niet voor iets anders tot conflicten leidt 

Mvg,
pitufo