![]() |
| Le forum de référence en programmation et développement. Articles, cours et tutoriels du débutant au chef de projet et DBA confirmé. | |||||||
|
|||||||
| Excel Forum d'entraide sur Excel |
![]() |
|
|
Outils de la discussion |
|
|
#1 (permalink) |
|
Membre Confirmé
![]() Date d'inscription: janvier 2006
Localisation: Belfort
Messages: 208
|
Bonsoir à tous,
Je bute depuis quelque jours sur un problème qui a mon avis doit être simple mais n'étant pas un spécialiste d'Excel, je vous remercie pour votre aide. Mon petit souci le voici : J'ai 2 feuilles : Feuil1 et Feuil2 Sur la premiere feuille colonne A, je dois inscrire le nom de personne participant à une journée de pêche. Sur la deuxième feuille colonne A, j'ai le nom de plusieurs personnes (la quantité n'est pas fixe). Ces personnes sont exclus du club et ne peuvent pas participer aux journées. Ce que j'aimerais, c'est que lorsque je saisie dans une cellule de la feuille 1 le nom d'une personne qui se trouve sur la feuille 2, une boite de dialogue m'avertisse que la personne est exclue. J'ai essayé avec le menu "Données/Validation" mais sans grand succés. avez-vous une idée ? un pt'it bout de code En vous remerciant par avance |
|
|
|
|
|
#2 (permalink) |
|
Membre expérimenté
![]() |
Bonjour,
Une petite idée avec une Mise en Forme conditionnelle : donne un nom à ta colonne contenant les noms des indésirables (par exemple liste). Puis dans la cellule où tu saisis les participants, pose la mise en forme conditionnelle suivante et affecte lui la couleur rouge : Code :
=NON(ESTNA(RECHERCHEV(B2;liste;1;FAUX))) |
|
|
|
|
|
#3 (permalink) |
|
Membre actif
![]() Date d'inscription: mars 2008
Localisation: Nantes
Âge: 26
Messages: 184
|
Bonjour,
Sinon tu peux le faire par vba Nomme ta liste de personne exclus "LISTE" Et mets le code ci-dessous dans "Feuil1" : Code :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 And Target.Value <> "" Then For Each cel In Worksheets("Feuil2").Range("LISTE") If Target.Value = cel And cel <> "" Then MsgBox "Cette personne n'est pas autorisée à participer !" Target.Value = "" End If Next End If End Sub |
|
|
|
|
![]() |
![]() |
||
Validation saisie dans une cellule
|
||
Offres d'
emploi informatique
sur Lesjeudis.com
|
| Outils de la discussion | |
|
|