Hi,
This (given) code finds a cell with its top border set,
but doesn't if it holds a value:
I've tried removing ".Clear" but it makes no difference.![]()
With Application.FindFormat .Clear .Borders(xlEdgeTop).LineStyle = xlContinuous .Borders(xlEdgeTop).Weight = xlThin .Borders(xlEdgeTop).ColorIndex = xlAutomatic End With
Thanks,
Stuart.
Bookmarks