VBA Excel sort range by specific column

Question

I have a table that can contain any number of rows:

As I said it can c

Answer 1

Or this:

Range("A2", Range("D" & Rows.Count).End(xlUp).Address).Sort Key1:=[b3], _
    Order1:=xlAscending, Header:=xlYes