automatically sort a table after changing a cell
I have a table with a colmun that has restricted values to Yes/No. Default
entry is No. Is it possible to have the table sort itself, so that when this cell is changed to Yes, the table sorts itself and puts the rows with Yes in that cell at the bottom of the table? Obviously this is very easy to do by just sorting it, but as this entry changes a lot and the workbook is shared amongst several people, it would be easier if it could be done automatically, rather than manually. thanks |
automatically sort a table after changing a cell
Hi Did you try something like this Private Sub Worksheet_Change(ByVal Target As Range) rowcount = Cells(Cells.Rows.Count, "a").End(xlUp).Row 'you can change the column here change from d to whatever Range("a1:" & "d" & rowcount).Select 'you can change the sort column here change from d to whatever 'you can change also if there is heater here form Header:=xlNo to Header:=xlYes Selection.Sort Key1:=Range("C1"), Order1:=xlAscending, Header:=xlNo, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom 'Range("a1").Select End Sub -- jetted ------------------------------------------------------------------------ jetted's Profile: http://www.excelforum.com/member.php...o&userid=17532 View this thread: http://www.excelforum.com/showthread...hreadid=565159 |
All times are GMT +1. The time now is 04:31 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com