How to sort table with VBA?

Hello, just very interested how to do it , tried everything i knew. Got the next lesson:
Set the name of cell B15 to 'criterion1' and the name of cell B18 to 'new'.
Assign a validation (input check) to the cell named 'criterion1', which allows you to select one birth month from the list.
Write a VBA program that writes from a large table of people (around cell 'tab_alg') to another region (starting at cell 'new')
data of those persons whose birth month and city are specified in the 'criterion1' cell in bold.
The result must have columns: first name, last name, city, month of birth and salary (be sure to in this order).
The program must also output (MsgBox) the number of records (rows) in the resulting result and the arithmetic mean of the salaries of those people.
First, the old results must be deleted (the titles remain).
Also consider the possibility that no records meet the conditions.
The procedure must start when clicking on a graphic object placed on a worksheet and activating this worksheet.
NB! Advanced Filter is NOT used in the VBA program of this application

image (5).pngimage (5).png