You can always format inside the code (IE7 tested) like this
[code][FONT=Arial]With ActiveSheet.ListObjects("Rewatching").DataBodyRange.Resize(ColumnSize:=1)
.Sort Key1:=.Cells(1, 1), Order1:=xlAscending, Header:=xlGuess, _
MatchCase:=False, Orientation:=xlTopToBottom
End With
With [FONT=Arial Black][B]ActiveSheet.ListObjects[/B][/FONT]("Rewatched").[COLOR="#0000CD"]DataBodyRange.Resize(ColumnSize:=1)[/COLOR] .Sort Key1:=.Cells(1, 1), Order1:=xlAscending, Header:=xlGuess, _
MatchCase:=False, Orientation:=xlTopToBottom
End With[/FONT][/CODE]
Result:
With ActiveSheet.ListObjects("Rewatching").DataBodyRange.Resize(ColumnSize:=1)
.Sort Key1:=.Cells(1, 1), Order1:=xlAscending, Header:=xlGuess, _
MatchCase:=False, Orientation:=xlTopToBottom
End With
With ActiveSheet.ListObjects("Rewatched").DataBodyRange.Resize(ColumnSize:=1) .Sort Key1:=.Cells(1, 1), Order1:=xlAscending, Header:=xlGuess, _
MatchCase:=False, Orientation:=xlTopToBottom
End With
Bookmarks