Try this. This will Bold and turn the text Red for the row and columns you
are referring to.

With Range(Cells(lastfilledrow + 2, 5), Cells(lastfilledrow + 2, 9))
.Font.ColorIndex = 3
.Font.Bold = True
End With
--
Cheers,
Ryan


"Ro477" wrote:

I am using Excel2002sp3 on WinXP. I have written

Worksheets("Report(metArb)").Activate
Range("B3").Select
Selection.End(xlDown).Select
lastfilledrow = ActiveCell.Row
ActiveSheet.Cells(lastfilledrow + 2, 5).Value = "Totaal"
sumcellformula = "=sum(h2:h" & lastfilledrow & ")"
ActiveSheet.Cells(lastfilledrow + 2, 8).Formula = sumcellformula
sumcellformula = "=sum(i2:i" & lastfilledrow & ")"
ActiveSheet.Cells(lastfilledrow + 2, 9).Formula = sumcellformula
sumcellformula = "=sum(j2:j" & lastfilledrow & ")"
End Sub

to find the last row and make some totals. This seems to work okay, but I am
having trouble selecting the lastfilledrow+2 ... that is selecting the whole
row. I'm sure it is simple, but I can't for the love of me figure out how to
do it. Basically .... how can I format the lastfilledrow+2, columns 5 to 9,
so that they are bold and red.... or basically how can I select the whole or
part of a row so I can format it ?

thanks for your help ... Roger