Ouvrir un userform

Bonjour ,

je sèche compètement. J'aimerai qu' un userform s'ouvre lorsque je clique sur une celllule . Peut-on le faire, si oui comment.

Peut-être que la solution existe déjà mais je ne l'ai pas trouvée sur le forum

Par avance merci pour vos solutions

8)

Salut le forum

Code à mettre dans le module de la feuille concernée

On veut une action quand on Click sur la Cellule "A1" uniquement :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
Userform1.show
End If
End Sub

Lien : Exemple d'utilisation de la méthode Intersect.

Mytå

5procedures.zip (28.94 Ko)
Rechercher des sujets similaires à "ouvrir userform"