VBA Autosort table by date

[mland1027]

Hello!
I am looking for a way or VBA code(Unsure of what would work better) that would automatically sort the data coming into a table by current date to oldest date. Below is how i have my table set up, so ideally the table would automatically sort by column B once the data is inputted
Column a b c
[TABLE="width: 294"]
<colgroup><col><col><col></colgroup><tbody>[TR]
[TD]Unit Type[/TD]
[TD]Move In Date [/TD]
[TD]Rent Amount[/TD]
[/TR]
[TR]
[TD]3x3sw-d[/TD]
[TD]06/26/2016[/TD]
[TD="align: right"]3,010.00[/TD]
[/TR]
[TR]
[TD]2x2sw-bu[/TD]
[TD]09/01/2015[/TD]
[TD="align: right"]2,345.00[/TD]
[/TR]
[TR]
[TD]2x2sw-f[/TD]
[TD]10/30/2016[/TD]
[TD="align: right"]2,660.00[/TD]
[/TR]
[TR]
[TD]2x2sw-g[/TD]
[TD]06/05/2014[/TD]
[TD="align: right"]2,470.00[/TD]
[/TR]
[TR]
[TD]2x2sw-c[/TD]
[TD]06/01/2012[/TD]
[TD="align: right"]2,325.00[/TD]
[/TR]
</tbody>[/TABLE]

Any suggestions greatly appreciated

thanks!

 

[alansidman]

How is the data being entered into the table?

 

[mland1027]

i am running a report and inputting that report into another tab within the workbook. the table is then pulling from that report.

thank you

 

[alansidman]

Place this in the Workbook Event

Option Explicit




Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim lr As Long
lr = Range("A" & Rows.Count).End(xlUp).Row
Range("A1").CurrentRegion.Sort Range("B1"), xlAscending, , , , , , xlYes
End Sub

 

[mland1027]

Thank you, but when i run the code i get a macros window to select the project location for the macros

 

[alansidman]

I don't understand your response. Did you put the code in the Workbook Event or just in a module?

With the VBE open, click on ThisWorkbook and then insert the code. It is Workbook Event and not a normal VBA module.

 

[mland1027]

Ok got it, now i am getting the response "To do this all the merged cells need to be the same size"

 

[alansidman]

Merged cells are a disaster when it comes to Excel and VBA. VBA does not work well with merged cells. Smart Excel developers avoid using merged cells. In my opinion, they cause more issues than they are worth. I avoid using merged cells especially when working with VBA.