Données validation 2 col mais reprise d'une col

[gueval]

Bonjour à tous,
N'étant pas très doué pour les macro, j'ai utilisé celles trouvées sur le site de Jacques Boisgontier.

Sur une cellule j'ai ma liste déroulante sur deux colonnes, et je récupère grace à la macro la valeur présente dans la première colonne.
Cela fonctionne, mais dans la vrai vie ce fichier sera utlisé par diférents utilisateurs, ce qui fait que si sur la cellule on tape suppr, ou si l'on entre manuellement une valeur la macro bogue et ne se relance pas même en faisant réinitialiser. il faut quitter excel et le relancer.

Auriez-vous une asctuce pour complèter le code de cette macro pour éviter ce problème.
je joint un fichier
je vous remercie d'avance de votre collaboration

 

[BOISGONTIER]

Re : Données validation 2 col mais reprise d'une col

Bonjour,

Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect([C2:Q2], Target) Is Nothing And Target.Count = 1 Then
    Application.EnableEvents = False
    If Target <> "" Then Target = Left(Target, InStr(Target, " ") - 1)
    Application.EnableEvents = True
  End If
End Sub

JB

 

[gueval]

Re : Données validation 2 col mais reprise d'une col

Merci beaucoup Monsieur BOISGONTIER,
Cela répond à toutes mes attente