I wrote the following code to format a specific spreadsheet that gets strange resizing everytime the data refresh is done.

Sub FormatWorkbook()
Dim renameRow As Range

'Format the second worksheet
Worksheets(2).Select
Range("A1:AB36").WrapText = True
Range("A:A").ColumnWidth = 14.46
Range("B:B").ColumnWidth = 12.86
Range("F:F").ColumnWidth = 7
Range("G:G").ColumnWidth = 7
Range("K:L").ColumnWidth = 7
Range("P:Q").ColumnWidth = 7
Range("U:V").ColumnWidth = 7
Range("Z:AA").ColumnWidth = 7
Rows(5).RowHeight = 38.25
Range("A:A").Rows.AutoFit

End Sub
However, in that Range A for the last line, there are a few pesky merged cells that span columns A and B that won't autofit height. How do I get this to recognize merged cells?

Thanks!