XL 2016 Copier en A jusqu"à dernière ligne de B

Bonjour à toutes et à tous,
Je vous souhaite un bon WE

Me re-voilà encore pour un truc que je ne sais pas faire malgré mes recherches.

Je voudrais faire une copie en code vba :

Copier la cellule A3 (OK) jusqu'au niveau de la dernière cellule NON vide de B,
Dans l'exemple copie de A3 de A4 à A21 (21 étant la dernière ligne de la col B).

Je joins un petit fichier test.

Comme à l'habitude , je vous remercie pour votre aide si précieuse.
amicalement,
arthour973