Op het blad nummerpertafel staat het aantal tafels echter niet in C1 maar in B1.
Dat heeft altijd in C1 gestaan, maar het maakt geen verschil. De formule opsplitsen via A1 maakt ook niets uit. Je kan de formule rechtstreeks maken.
ook moet niet het aantal tafels geprint worden op dit blad maar het aantal deelnemers dus aantal tafels *4
zo weet bvb deelnemer 17 direct aan welke tafel hij zit voor de 4 rondes
Dat is juist, maar ik doelde al op het probleem met het afdrukken. Dat gebeurt perfect en gemakkelijk, enkel.... er worden ook (voor ons) lege rijen afgedrukt. Enkel, ze zijn niet echt leeg. Luc laat bovenaan elk blad de hoofding bijplaatsen, en deze staat voor het afdrukprogramma wel zichtbaar in al de (verder lege) pagina's. Dat zie je pas als je op Afdrukvoorbeeld klikt.
We zouden het afdrukgebied moeten kunnen bepalen (Range(......).Select), maar met een variabele, dus met C1 (of B2).
Ik heb het al op tal mogelijke manieren geprobeerd, maar vind het niet.
Normaal doe je:
A = Range("C1").Value 'Nu "B2"
Range(Range("A1"), Cells A, 5).select
Selection.Print.....
maar die combinatie van Range en Cells klopt niet....
Na het lezen van je reactie
@ SoftAid
Laat je ook niet vangen aan het afdrukvoorbeeld. Deze toont 10 bladzijden aan.
als je de knop gebruikt print hij enkel de nodige cellen.
Moet je maar even testen met een pdf printer
moest ik daarstraks toch vaststellen dat de printer 18 vellen papier erdoor gejaagd heeft bij 25 tafels.
Om dergelijke test te doen zet ik de letterkleur op wit, verwijder de randen, en bekom zo afdrukken zonder inkt of papier te verbruiken. SoftAid