Status selecteren moet hele rij verplaatsen naar andere tabblad en terug.

[Michael_B]

Beste,

Ik heb tot nu toe een VBA oplossing gevonden (online) voor het verplaatsen van een hele rij als de status middels een keuzelijst verandert van OPEN naar KLAAR. Dan gaat de hele rij naar het Tabblad Archief. Terug werkt ook. Al sorteert hij niet direct. Maar dat is minder belangrijk.

Nu wil ik dit ook voor de status HOLD. Alleen dan moet er een datum opgegeven kunnen worden wanneer deze dan weer automatisch terugkeert naar het Tabblad Actielijst. En daar loop ik vast.

Wie kan me helpen de juiste richting op te sturen?

Bestand toegevoegd waar het voorbeeld in staat.

Gr.
Michael

 

[AHulpje]

Probeer het hier eens mee.
Als de holddatum (kolom A van werkblad Hold?) verstreken is wordt de actie automatisch teruggezet op het moment dat het werkboek geopend wordt.

 

[Michael_B]

Hoi @AHulpje
Dankjewel. Dit werkt voor zover ik kan testen goed. De rij verplaatst naar Hold nadat er een Holddatum is opgegeven. Morgen even kijken of hij ze ook terugzet naar Actielijst. Waarschijnlijk precies zoals ik wilde. Top.

Zie alleen wel dat de Klaar status nu een foutmelding geeft als ik deze op Klaar zet.
De rij gaat desalniettemin wel naar het Archief tabblad en ook weer terug. Terug zonder foutmelding.

 

[AHulpje]

En wat is de foutmelding? Het lijkt meer op een breakpoint.
Ik ontdekte nog een foutje in de ThisWokbook module:

For r = 10 to lastrow

moet natuurlijk

For r = lastrow To 10 Step -1

zijn.
Je kunt het terugzetten ook testen door de datum in kolom A van het werkblad Hold op gisteren te zetten, het document op te slaan, te sluiten en weer te openen.

 

[popipipo]

Waarom steeds alles heen en weer verplaatsen

Neem 1 tabblad zet daar alles in en gebruik de functie 'FILTER' in een ander tabblad om de juiste gegevens te zien.

 

[Michael_B]

@AHulpje

Dankjewel. Heb de code aangepast naar: For r = lastrow To 10 Step -1
Weet niet precies wat het doet, maar het werk nog steeds.

Echter nu nog steeds wel het probleem dat ik de volgende melding krijg wanneer ik de status KLAAR gebruik.:

Het werkt wel, heen en terug.
Het lijkt erop dat er een conflict is met de HOLD code.

Dan nog een vraag: kan ik ook handmatig de HOLD status aanpassen naar KLAAR of OPEN en dat deze dan ook verplaatst naar "Actielijst" of "KLAAR" ?

Gr.
Michael

Bericht automatisch samengevoegd: Vandaag om 11:39

@popipipo ik snap wat je zegt. Heb ook jouw voorstel getest. Alleen loop ik tegen diverse fouten aan. Zo ziet ik "#####" of "#OVERLOPEN" ipv de datum.

Desalniettemin ga ik het ook verder onderzoeken.

Dankjewel voor je voorstel en tijd.

Gr.
Michael

 

[AHulpje]

Alle verplaatsmogelijkheden in één Sub geplaatst, zie Module1.

 

[Michael_B]

@AHulpje net getest. Heen en weer en alle andere varianten.

Ik ben een gelukkig man. Dankjewel nogmaals. Dit is precies wat ik wilde.

Deze vraag kan gesloten worden.

Gr.
Michael

 

[popipipo]

Zo ziet ik "#####" of "#OVERLOPEN" ipv de datum.

Kun je zeggen waar je dit precies ziet in mijn of jouw bestandje

De hekje kun je denk ik oplossen door de kolombreedte (of datum notatie)
Overlopen heeft te maken met gevulde cellen onder of rechts van de filter formule.