Automatic Sorting by Date

Question

Hello,

I am creating a list of tasks with the date it must be accomplished by in column B. What I want to happen is that anytime a task is entered and I type the date in column B, for that row to automatically sort in chronological order, with the soonest date at the top and farthest at the bottom. This should happen anytime a new date is entered OR changed.

If a task does not have a date, it should list at the bottom.

I have data in columns A-E, so the range I need sorted is A1:E150

I have headers in row A that should never move.

I believe this is done by using a macro under "view code" but I have not been able to get it to work from the videos I have seen. Please let me know if you can help.

Answer 1

I have uploaded the workbook with macro to https://1drv.ms/x/s!Akd5y6ruJhvhiggnTeiHJVAyIvE5

For your reference, below are the steps which I have undertaken

1. Make a backup of your workbook.
2. Open your workbook and ALT+F11
3. Locate your Workbook name in Project Explorer Window
4. Double click on your worksheet name
5. Copy paste the Macro code given below
6. Save your file as .xlsm Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ExitSub Application.EnableEvents = False If Intersect(Target, Me.Columns("B")) Is Nothing Then GoTo ExitSub Me.UsedRange.Sort Key1:=Range("B1"), order1:=xlAscending, Header:=xlYes ExitSub: Application.EnableEvents = True End Sub

Answer 2

Thank you! It works perfectly.

Answer 3

Great, thank you!

You can find it at the link below. I left the dates in.

https://drive.google.com/open?id=0BzivkuXJZB\_SQ2F0YTNzUi1OSnc

Answer 4

I can create the macro for you. For this, I would need your workbook. Could you please upload a sample workbook sans confidential data to Onedrive / Googledrive / Box / Dropbox or any other file host and share the link? It will help us to give prompt and high quality solution.