Procédure évènementielle qui va afficher un userform (qui doit éxister dans votre fichier) en fonction de la valeur de la cellule cliquée...
Pour cet exemple il vous faut trois Userforms nommés respectivement Userform1, Userform2 et Userform3
Ensuite, en fonction du nom inscrit dans une cellule s'affichera l'userform en question dès le clic sur la cellule
procédure à coller dans le module de feuille
Option Explicit
'Ti
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
With Target
If InStr(1, .Value, "userform", vbTextCompare) > 0 Then
Select Case LCase(.Value)
Case "userform1"
UserForm1.Show
Case "userform2"
UserForm2.Show
Case "userform3"
UserForm3.Show
End Select
End If
End With
End Sub