Filtrer par une fonction VBA

[Marboi]

Bonjour à tous,
Pourriez-vous m'expliquer la manière de procéder (hors le filtre automatique) pour affecter une macro qui me permettrai d'aller directement sur le 1er nom d'une liste dans une colonne en cliquant sur un bouton portant la 1ère lettre : exemple, le bouton intitulé G m'amène directement sur le premier nom commençant par G dans la liste. Je l'ai fait sans aucun problème avec les liens hypertexte, mais à chaque fois que j'ajoute des noms, je suis obligé de décaler les références. Au début ça n'était pas génant, mais maintenant ça devient ardu (plus de 1000 lignes).

PS : Est-il possible de faire de même pour les deux premières initiales etc... ?

Merci d'avance

 

[Marboi]

Petite question quand même : si je comprends bien, la ligne de macro
x = Trim(ActiveSheet.Shapes(Application.Caller).TextFrame.Characters.Text)
prend la place de la ligne de macro
x = Application.Substitute(Application.Caller(1), 'Bouton', '')
ou vient-elle s'ajouter ?
Car j'ai essayé sur un bouton (que je construit avec formulaire) sans le nommer donc, et figurez-vous que ça ne fonctionne pas.
Aurai-je encore oublié quelque chose ?