XL 2019 Macro Afficher une cellule de la dernière ligne d'un critère

Bonjour à tous.

Je suis débutant en VBA. SVP, j'ai vraiment besoin d'un coup de main pour la transcription de ces 2 formules en code VBA :

=DECALER(B1;MAX(LIGNE(A2:A20)*(A2:A20=E3))-1;; :

=DECALER(B1;MAX(LIGNE(A2:A20)*(A2:A20="Jacques"))-1;;+DECALER(B1;MAX(LIGNE(A2:A20)*(A2:A20="Jean"))-1;;+DECALER(B1;MAX(LIGNE(A2:A20)*(A2:A20="Paul"))-1;;

En fait je voudrais bien afficher ces résultats dans des textbox ou label d'un userforl. Cette fois ci la liste déroulante en B1 se retrouve maintenant dans un ComboBox du userfom. Je joins un fichier à titre d'exemple. Merci de votre aide.