clique sur une case et afficher un texte

wrndid

XLDnaute Occasionnel
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
 

gilbert_RGI

XLDnaute Barbatruc
Re : clique sur une case et afficher un texte

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

Bonjour

Voilà un exemple en PJ

Salutations

RGI
 

Pièces jointes

  • liste_validation.xls
    15 KB · Affichages: 168
  • liste_validation.xls
    15 KB · Affichages: 130
  • liste_validation.xls
    15 KB · Affichages: 149

gilbert_RGI

XLDnaute Barbatruc
Re : clique sur une case et afficher un texte

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

voilà pour une feuille et pour les colonnes 2 5 7 à reporter dans les deux suivantes

Code:
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

:D

Salutations

RGI
 

Discussions similaires

Statistiques des forums

Discussions
312 017
Messages
2 084 629
Membres
102 619
dernier inscrit
Chimmm