Could you eventually add a "helper column" with =RIGHT(A1,4) and use that new column to sort ?
(I'm no VBA man myself)

__________________
Using O365 v2503 - Did you know you can thank someone who helped you? Click on the tiny scale in the right upper hand corner of your helper's post