Josd

Hallo, Ik heb volgende vraag. Ik gebruik een excelwerkblad als rapport (beslaat exact 2 bedrukte blz.), en daaronder kan dit rapport meerdere malen terugkeren. Normaal worden alle rapporten in één keer afgedrukt, maar soms moeten er maar 1 of een paar afgedrukt worden. Dit is afhankelijk van de datum op het rapport (of de rapporten) in kwestie. Dus moet ik de datums doorlopen en op basis daarvan beslissen welke rapporten mogen worden afgedrukt. Het doorlopen van de datums is geen probleem (hij komt voor om de 90 cellen). Dit gaat als volgt : 'Eerst bepalen hoeveel rapporten op het werkblad voorkomen: Range("A3").Select Selection.Name = "x" Set b = Range("x") n = 90 m = 1 For p = 1 To 100 ActiveCell.Offset(n, 0).Range("A1").Select If IsEmpty(ActiveCell) Then Exit For End If Next p 'Daarna aan de hand van een inputbox de gebruiker de af te drukken datum laten ingeven: Range("B10").Select 'hierin staat de datum mijndat = Format(ActiveCell.Value, "dd/mm/yyyy") datum = Application.InputBox("Welke datum wil je afdrukken ?", , mijndat, Type:=1) For reeks = 1 To p If ActiveCell.Value = datum Then Range("A" & m, "B" & n).Select n = n + 90 m = m + 90 ActiveCell.Offset(n, 0).Range("A1").Select else n = n + 90 m = m + 90 ActiveCell.Offset(n, 0).Range("A1").Select next reeks Wat ik echter niet vind, is hoe je de geselecteerde bereiken die aan de voorwaarde voldoen (dus de "Range("A" & m, "B" & n).Select") kunt verwerken in de lus, zodanig dat ze bewaard worden in aparte variabelen. Soms kan er dat één zijn, maar even goed vier of zes zeg maar, en die sluiten niet noodzaklelijk op mekaar aan. Hoe kan je die bewaren zodat je ze nadien kan samenvoegen (bv. met 'union'?) en na mekaar kan afdrukken ? Alvast bedankt voor de reacties.

Is ook niet echt nodig; zoals reeds gezegd, het probleem werd opgelost door de knoppen in het werkblad te plaatsen (en het bestand te kopiëren in gesloten toestand).

Dat heb ik om eerlijk te zijn niet geprobeerd, maar heb je dan de problemen die ik hierboven beschreef niet meer ?

Dag Bucky, Dank voor je suggestie. Ben er enkele dagen niet geweest, vandaar wat late reactie. Eigenlijk had ik dit al geprobeerd, maar het was 1 van de problemen die ik had, nl. dat bij het opslaan onder een andere naam de verbinding tussen de gemaakte macro's en de knoppen niet meer wilde 'marcheren'. Ik heb intussen uitgevist hoe dat komt en blijkbaar moet je het moederdocument eerst opslaan en sluiten en daarna pas kopiëren; alleen zo wordt de link met het moederdocument (voor wat de relatie tussen knop en macro betreft) definitief verbroken. Als je het moederdocument opent, wijzigt en opslaat onder een andere naam, dan wordt de link met het moederdocument NIET verbroken, en zit je in de problemen. Ik ben er intussen ook achter dat je beter geen knoppen toevoegt aan de werkbalk, maar wel rechtstreeks in het document zelf. Die blijven immers mooi binnen het document; zet je ze op een werkbalk, dan krijg je die knoppen overal in andere exceldocs waar ze niet gewenst zijn... Tot genoegen.

Ik heb een excelbestand gemaakt met zelfgemaakte knoppen waaraan zelfgemaakte macro's gekoppeld zijn. De macro's worden aan de knoppen "toegewezen". Tot zover werkt dat allemaal. Dit bestand moet dienen als een soort 'sjabloon'; er zal dus telkens een kopie van genomen worden om gegevens in te vullen en deze kopie wordt dan opgeslagen. Als ik echter een kopie maak van dit excelbestand dat de macro's (en de knoppen) bevat, dan worden de macro's weliswaar meegekopieerd, en de knoppen ook, maar de link tussen de macro's en de knoppen verdwijnt. Als je dus een knop aanklikt, dan zoekt hij naar het originele excelbestand waarin macro's en knoppen werden gemaakt, maar aangezien het originele bestand niet openstaat, verliest de knop blijkbaar de verwijzing naar de betreffende macro. Mijn vraag is nu : hoe kan je dit oplossen ? Is er ergens iets van code die ik kan gebruiken opdat de gekopieerde knoppen hun 'toewijzing' niet zouden kwijtspelen ? Alvast dank voor jullie reacties. Met vriendelijke groeten, Jos