iLastRow = Cells(Rows.Count,"A").End(xlUp)
Range("A" & iLastRow & ":G" & iLastRow).Select

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Juan" wrote in message
...
Hello,
I want to format my columns wth borders, but if I select
example Columns("A:G").Select
It will put borders all the way down. I want to put
borders just to the last row of data. So when user wants
to print report it doesn't show Borders all the way down.

Please advise any info. would appreciate it.

Thanks,

Juan