Re: erasing outside print area

Tech-Archive recommends: Speed Up your PC by fixing your registry




This works for me.
Code:
--------------------
Dim pValues As Variant
With Active***
pValues = .Range(.PageSetup.PrintArea).Value
.Cells.ClearContents
.Range(.PageSetup.PrintArea).Value = pValues
End With
--------------------
er;513921 Wrote:
hallo,
how can erase the empty cells, outside print area?




--
mikerickson
.


Quantcast