Print range genereren

[caffie]

ik ben op zoek naar een oplossing om een print range te genereren

Ik wil dus de laatst regel van kolom "B" met een waarde boven de 0,01 zoeken
en de laatste kolom van regel 4 met een waarde boven de 0,01

Deze waarde wil ik in een printrange verwerken

Dus printen vanaf "B2" tot Cel (laatste gevondenregel + 5 ,laatst gevondenkolom + 6)

nu weet ik niet of het een probleem is dat er regels hidden zijn bij genereren van de printrange
en of het een probleem is dat er een formule in de cel staat

Ik heb er een voorbeeld bij gedaan
Zodat het een en ander duidelijk wordt

Vast bedankt voor jullie hulp

 

[Cobbe]

De ASAP-Utilities zijn daar perfect bruikbaar voor.
Onder subtab Sheets punt 13.

Succes, Cobbe

 

[WimenBeer]

Je kan ook hiervan gebruik maken:

Worksheets("Sheet1").Range(??:??).PrintPreview

Maar dan moet je nog wel de Ragne vaststellen.

Wim

 

[caffie]

Je kan ook hiervan gebruik maken:

Worksheets("Sheet1").Range(??:??).PrintPreview

Maar dan moet je nog wel de Ragne vaststellen.

Wim

Maar dat is juist de vraag
toch bedankt voor je tijd

 

[caffie]

De ASAP-Utilities zijn daar perfect bruikbaar voor.
Onder subtab Sheets punt 13.

Succes, Cobbe

Sorry maar dat snap ik dus niet
Ben hierin dus een leek
kan je dit een beetje uitleggen
vast bedankt voor je tijd

 

[Warme bakkertje]

Caffie, kijk hier dan maar eens

http://www.asap-utilities.com/nl-sneller-werken-in-excel.php

Mvg

Rudi

 

[caffie]

Caffie, kijk hier dan maar eens

http://www.asap-utilities.com/nl-sneller-werken-in-excel.php

Mvg

Rudi

oke dat ziet er goed uit
maar omdat dit ook op PC moet draaien waar dit niet geinstaleerd staat
ben ik bang dat ik het voor deze toepassing niet kan gebruiken

toch bedankt voor de TIP

 

[Cobbe]

Ik snap niet direct hoe de rijen gefilterd worden.
De kolommen gaat goed.

Maar als je het filteren kunt doen kun je volgende code in uw macro voegen.


Range("$A$1:$Z$210").PrintPreview
Range("$A$1:$Z$210").PrintOut

Deze print enkel de zichtbare kolommen en rijen.

Staat er nu reeds tussen.

Cobbe

 

[WimenBeer]

    ActiveSheet.PageSetup.PrintArea = "$B$2:$M$71"

Met deze code kan je ook het print gebied vaststellen.
Ik heb het verder niet uitgeprobeert maar wellicht kan je hiermee kombineren.

Wim