Frank I tried this but it changes all the rows to the new height

For Each row In Range("A101", Range("End").Offset(0, 0))
If RowHeight <= 12.75 Then
row.RowHeight = 11
End If
Next row

can you help

James


"Frank Kabel" wrote in message
...
Hi
then you have to loop through all rows. and check each individually

--
Regards
Frank Kabel
Frankfurt, Germany

"James Montgomery" schrieb im Newsbeitrag
...
Hi,

I want to use the range below and then check each row in that range
for row
height, if the row height is = to 12.75 or less then I want to
change the
row height to say 11.75 and all other rows in the range leave as they
are.

Range("A101", Range("End")
range name ("End") is in column A

Thanks
James