Modifier valeur de cellule

Résolu
JCB40 Messages postés 3031 Date d'inscription   Statut Membre Dernière intervention   -  
JCB40 Messages postés 3031 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Dans ma cellule A1 si je tape 1 le1 doit être remplacer par LYON si je tape 2 le 2doit être remplacer
par Lille j'ai trouvé un code que j'ai adapté mais je suis obligé de faire un clic sur le chiffre 1 ou 2
pour que le résultat apparaisse ,je souhaiterais que le changement se fasse directement aprés avoir
rentré le chiffre
Voir le code ci-dessous
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal c As Range)
If c.Count > 1 Then Exit Sub
If c <> "" And c = "1" Or c = "2" Then
If c = "1" Then
c = "LYON"
Else
c = "Lille"
End If
End If
End Sub
<code>
</code>

Merci pour votre aide
Cordialement


Configuration: Windows / Firefox 71.0


A voir également:

2 réponses

jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 753
 
Bonjour
Au lieu de
Worksheet_SelectionChange

Il faut utiliser

Worksheet_Change
1
JCB40 Messages postés 3031 Date d'inscription   Statut Membre Dernière intervention   466
 
Bonsoir Jordane
Merci pour ta réponse
Exactement ce qu'il me fallait
Cordialement

0