Alors :
1) Tu sélectionnes la forme : son nom apparaît dans la zone Nom (à gauche de la barre de formule).
2) Tu sélectionnes le nom dans cette zone Nom, tu en tapes un (plus convivial) qui te convient, tu valides par Entrée.
3) Il est prudent de vérifier que le nouveau nom a bien été pris en compte en resélectionnant la forme...
En début de ta macro :
Dim fm$
fm = Application.Caller
...
ou bien :
If Application.Caller = "xxx" Then
...
ou encore, si par exemple tu termines tes noms avec un numéro d'ordre :
Dim nf%
nf = CInt(Right(Application.Caller, 1))
Select Case nf
Case 1
...
Case 2
...
Case 3
...
End Select
...
Cordialement.