Suppression de valeurs ds une liste

[christian.bedere]

Bonjour à vous tous

Je suis à la recherche d'une aide me permettant de supprimer par formule (de préférence) ou par macro (c'est bien aussi), dans une liste les éléments inscrits si dans une liste à côté les mêmes indications sont affichées.

Un exemple en pièces jointes sera bien utile pour facilter la compréhension.

Je vous remercie bien

Kiki

 

[abc]

Re : Suppression de valeurs ds une liste

Bonjour,
essaye et a adapter
Private Sub Worksheet_Change(ByVal Cellule As Excel.Range)
If Cellule.Column = 1 Or 3 Then
If Application.WorksheetFunction. _
CountIf(Range("A1:c12"), Cellule.Value) > 1 Then
MsgBox "HOLA,Je suis déja inscrit "
Cellule.Value = ""
Cellule.Select
End If
End If
End Sub

A +

 

[job75]

Re : Suppression de valeurs ds une liste

Bonjour,

abc : pas testé votre code, mais je me permets de corriger :

If Cellule.Column = 1 Or [COLOR="Red"]Cellule.Column =[/COLOR] 3 Then

A+

 

[christian.bedere]

Re : Suppression de valeurs ds une liste

Salut et merci pour l'intéret que tu me portes

Peux tu STP sans vouloir exagérer placer ce code dans le fichier que j'ai joint, car dans le mien , je n'arrive pas à comprendre où je dois le placer et cela ne fonctionne pas,
je te remercie infiniment

kiki

 

[abc]

Re : Suppression de valeurs ds une liste

Bonjour,
j'ai essayer les deux codes et cela fonctionnent.
Je n'ai peut être pas tout saisis.
Merci de me corriger
A +

 

[christian.bedere]

Re : Suppression de valeurs ds une liste

Salut abc

J'ai essayé de placer le code dans le mien, mais je ne sais pas si je dois le placer ds un module, dans l'onglet vba de la feuille en cours .... j'aimerai pour le comprendre que tu me renvoies STP le fichier de base avec le code à la bonne place, de façon à ce que je puisse le comprendre, et l'adapter à mon tableau de travail
Merci beaucoup de ton aide

 

[abc]

Re : Suppression de valeurs ds une liste

Bonjour,
il faut coller le code dans VBA.
Pour cela ALT +F11 pour accéder a la procédure.
Revoici le fichier.
A +

 

[christian.bedere]

Re : Suppression de valeurs ds une liste

Re--

Ok j'ai compris ce que tu as proposé.
Je pensais que la macro était actualisée à chaque changement de page, et non à chaque saisie dans les cellules.
Pour moi, j'aimerai que lors de la saisie d'un nouveau nom ds la colonne "a", la valeur commune ds la colonne "c", se supprime et non un message d'erreur (si possible).
Merci encore

 

[job75]

Re : Suppression de valeurs ds une liste

Re abc,

Bonjour,
j'ai essayer les deux codes et cela fonctionnent.
Je n'ai peut être pas tout saisis.
Merci de me corriger
A +

<If Cellule.Column = 1 Or 3 Then > est calculé comme :

<If (Cellule.Column = 1) Or (3) Then >

Cette condition est toujours vérifiée, car 3 est considéré comme True (VRAI).

A+

 

[Monique]

Re : Suppression de valeurs ds une liste

Bonjour,

Une proposition par formule

Une liste annexe (par formule matricielle) contient la liste des devis restant à créer
Cette liste diminue au fur et à mesure que les devis sont créés
A partir de cette liste, ont fait des listes de validation dont le contenu diminue, diminue…

Ou bien, tout simplement, pourquoi pas une mise en forme conditionnelle ?

 

[christian.bedere]

Re : Suppression de valeurs ds une liste

Bonsoir à vous tous et un bisous particulier à Monique

Ha cette chère Monique !!
Je savais, oui je savais, qu'elle était la reine de la formule, mais là, c'est de l'ART madame!
Merci de vous être penché sur mon essai, qui depuis quelques temps me posait problème
Je préférai passer par formule que par VBA et je suis très heureux de cette solution
Tout fonctionne convenablement et je suis ravi d'avancer aussi bien.
Merci encore pour votre soutient et j'espère à bientôt
Kiki

 

[christian.bedere]

Re : Suppression de valeurs ds une liste

Bonjour à vous tous

J'essaie de modifier la formule de Monique pour un autre tableau, mais en renommant les nouvelles cellules de la même façon, je ne parviens pas à obtenir de bons résultats

Pouvez vous m'aider SVP

Christian

 

[Monique]

Re : Suppression de valeurs ds une liste

Bonjour,

J'ai juste copié-collé la formule de E2 en K2,
modifié les noms et…
validé en appuyant simultanément sur les 3 touches ctrl, maj et entrée

"Formule matricielle, à valider par ctrl, maj et entrée"

 

[christian.bedere]

Re : Suppression de valeurs ds une liste

Bonsoir Monique et le forum

D'abord toutes mes excuses mais je n'ai pas pu regarder votre solution avant

Je n'avais pas activé la formule matricielle et depuis cela fonctionne parfaitement
Merci beaucoup de votre aide

A bientîot j'espère si j'ai encore besoin de vos bons conseils
Kiki