Dblclic sur cellule userform s'ouvre
mohidou71
Messages postés
14
Statut
Membre
-
mohidou71 Messages postés 14 Statut Membre -
mohidou71 Messages postés 14 Statut Membre -
Bonsoir a tous
et bravo pour ce forum
ma question est:
Est-il possible que quand je clic par ex sur les cellule A1 à A4 d'ouvrir une userform.
Jai un classeur excel avec une feuille et jaimerai que quand je clic sur la cellule A1 ou A2 ... ou A4 que ma userform1 souvre.
Merci a tous
et bravo pour ce forum
ma question est:
Est-il possible que quand je clic par ex sur les cellule A1 à A4 d'ouvrir une userform.
Jai un classeur excel avec une feuille et jaimerai que quand je clic sur la cellule A1 ou A2 ... ou A4 que ma userform1 souvre.
Merci a tous
2 réponses
-
Re,
Faudrait avoir un peu de patience!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Regardez sur votre demande precedente -
Bonjour
j'ai essayé sa marche nikel mais quelle ligne de code rajoutée pour récupérer l'information d'une autre feuille.
j'ai essayé je n'y arrive pas, excusé moi mais je suis débutant dans le VBA.
merci d'avance-
Re,
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Count > 1 Then Exit Sub If Not Application.Intersect(Target, Range("A1:A4")) Is Nothing Then Cancel = True With Worksheets("feuil2") 'mettre le nom de la feuille 'recherche Nb = Application.CountIf(.Range("I1:I4"), Target) If Nb > 0 Then lig = 1 lig = .Columns("I").Find(Target, .Cells(lig, "I"), , xlWhole).Row UserForm1.Label1.Caption = .Cells(lig, "J") UserForm1.Show Else MsgBox "Desole, n'exite pas dans table !!!!!" End If End With End If End Sub
-
