I tried to use the code below to sort the range of cells in column A s
that the strikethrough characters can be sorted to the top.

I used these steps but it failed to run. Appreciate if someone ca
help. Thanks a lot.
1) Open Excel.
2) Right click on the Sheet1 name tab.
3) Select View Code.
4) Copy the code and paste it over the top of the Sheet1 code window.
5) Press Alt+Q to return to Excels normal view.
6) Push Alt+F8, but there is no macro name I can select select to Run




Public Function IsStrikeThrough(rng As Range)
Application.Volatile
IsStrikeThrough = rng.Font.Strikethrough
End Function


Use this in an adjacent column and use that as the first sort key

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com