x=Cells(Rows.Count, 1).End(xlUp).Row + 1
range(cells(x,"a"),cells(x,"o")).formathoweveryouw anttoformatit
cells(x,"a")=application.sum(whateveryouwanttosum)

--
Don Guillett
SalesAid Software

"Juan" wrote in message
...
Hello Don/Bob,
thanks tested both or yours and seem fine. Using the
Entirerow, I format the whole row which I don't want. If I
used the one without ENtirerow, I can only figure out how
to format Column A. I want to format Column A-O( In column
A I want to put the word TOTAL and in column C I want to
do a Sum. Do I have to do like an IF/then?

Please advise if this can be done. I'm trying different
ways but can't see to do it.

As always appreciate all the help.

thanks,

juan
-----Original Message-----
this
Range("A65536").End(xlUp).row+1.EntireRow.Select
or
Cells(Rows.Count, 1).End(xlUp)(2).EntireRow.Select
or
Rows(Cells(Rows.Count, 1).End(xlUp).Row + 1).Select
or

--
Don Guillett
SalesAid Software

"Juan" wrote in message
...
Hello,
I want to format the first empty row after the last used
row. IF I use
Range("A65536").End(xlUp).EntireRow.Select
But this won't work. Been locking for similar post but
the
ones I tried i can't seem to get it to work.
Can anyone give some info?
I want to put totals on this row.

Thanks,

juan


.