clique sur une case et afficher un texte

wrndid à dit:

bonjour quelle est la solution pour afficher un texte dans une cellule de le collone b de b3 a b15 en cliquant dessus le texte est identique
merci

Cliquez pour agrandir...

wrndid à dit:

re
pas du copier coller ni de menu c'est juste la fonction ou une macro quand je click la cellule le texte est afficher
merci

Cliquez pour agrandir...

wrndid à dit:

bonjour cela fonctionne bien
Peut on le faire sur 3 colonne et chaque colone a son texte et sur 3 feuille du classeur
merci

Cliquez pour agrandir...

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Row > 15 Or Target.Row < 3 Then Exit Sub
    Select Case Target.Column
    Case 2
        Target.Value = "coucou"
    Case 5
        Target.Value = "mon ami"
    Case 7
        Target.Value = "voilà"
    Case Else
        Exit Sub
    End Select
End Sub