I have seen a snippet somewhere to fast and easy select cells and cell areas
by using Find method. Maybe it was in combination with Specialcells. Are
there any of you having a snippet of this on the shelf? Or in your head?

I need to define a PrintArea for all the pages containing cells.visible =
True and think maybe I can do this by specify the area as all cells where
xlCellTypeVisible = False

/Regards