macro code needed

[colinharwood]

Hi All

I have written the following macro code

Range("G26").Select
Selection.End(xlDown).Select
Selection.Offset(5, 6).Select
Range(Cells(ActiveCell.Row + 0, ActiveCell.Column), Cells(27, ActiveCell.Column - 12)).Select
ActiveSheet.PageSetup.PrintArea = "XXXXX"

Which selects active cells and i then want to set the active cells as the print area.

How should the code be written for the "XXXXX"

Thanks

Colin

 

[Andrew Poulsom]

Not tested, but try:

= Selection.Address

 

[colinharwood]

Cheers Andrew

Works just fine

colin