Tekst uit verborgen kolommen printen

[Databeest]

Ik wil graag bepaalde tekst printen die in verborgen kolommen staat, namelijk tekst uit bereik A1:B4.

De kolommen A en B mogen niet zichtbaar zijn op het scherm, hoe kan ik toch de tekst printen die in deze kolommen staat?

Ik krijg nu bij het printen een lege pagina.

 

[Wigi]

En waarom mogen die (al is het maar tijdelijk) niet op het scherm komen?

 

[Databeest]

Dit is in verband met het beschermen van de info, die erin staat.
het liefste zou ik de cellen beveiligen, maar dan kunnen er bepaalde berekeningen (op de achtergrond met macro) niet uitgevoerd worden.

vandaar deze oplossing.

 

[kloosterofobie]

Dus je wilt ze niet in beeld om de info te beschermen?? Maar ze moeten wel geprint worden???

Als je cel beveiligd is kun je toch gewoon je berekeningen uitvoeren??

 

[Databeest]

Via een macro wordt er een cel aangepast; als je deze beveiligt, kan de macro niet uitgevoerd worden.

 

[Justes]

Hallo....

Als de kolomen verborgen zijn door groeperen, dan aan het begin van de printcode,

Columns("A:B").Select
Selection.Columns.Ungroup

en aan het einde,

Columns("A:B").Select
Selection.Columns.Group

als je kolombreedte op 0 gezet hebt, aan het begin van de printcode,

Columns("A:B").Select
    Selection.ColumnWidth = 4,5

en aan het einde,

Columns("A:B").Select
    Selection.ColumnWidth = 0

Gr Justes

 

[Justes]

Via een macro wordt er een cel aangepast; als je deze beveiligt, kan de macro niet uitgevoerd worden.

Hallo....

Ja dat kan wel, aan het begin van de code.

ActiveSheet.Unprotect Password:="jouw password"

en aan het einde.

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

Gr Justes

 

[Databeest]

Beste Justes,

Jouw laatste oplossing is prima.
Bedankt!

 

[Justes]

Beste Justes,

Jouw laatste oplossing is prima.
Bedankt!

Graag gedaan zet je hem nog even op opgelost.

Gr Justes