If HeaderWidths(col) > ColumnWidths(col) Then
Change = 1
ColumnWidths(col) = Max(HeaderWidths(col), ColumnWidths(col))
Else If ColumnWidths(col) > HeaderWidths(col) And ColumnWidths(col) > DataWidths(col) Then
Change = 1
ColumnWidths(col) = Max(HeaderWidths(col), DataWidths(col))
End If