Renvoi de message texte sur autre cellule

Bonjour

Je débute dans VBA, et mon programme pour réaliser la macro suivante ne se lance pas :

Après avoir activé une cellule, en fonction de la colonne dans laquelle elle appartient, je souhaiterai renvoyer un résultat dans une autre cellule (en A1)

Exemple :

Si B1 est selectionné, je veux que le message ''test1'' soit affiché dans la cellule en A1

Si C1 est selectionné, je veux que le message ''test2""soit affiché dans la cellule A1

Enfin si souhaiterai appliquer cette macro pour toutes les lignes du tableau

Merci pour votre aide.

Bonjour et bienvenue sur le forum

Essaie avec cette macro à placer dans la feuille VBA obtenue après un clic droit sur l'onglet de ta feuille et choix de ''Visualiser le code'' :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$B$1" Then
        Range("A1") = "Test 1"
    ElseIf Target.Address = "$C$1" Then
        Range("A1") = "Test 2"
    End If
End Sub

OK ?

Bye !