Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1338 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Validation de liste dans une cellule

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Validation de liste dans une cellule

n°1201892
rubycube
Posté le 18-09-2005 à 18:18:41  profilanswer
 

:hello: à tous,
 
J'ai créer un planning sur excel, de la cellule A1 à A25 feuille Planning, j'ai des noms de personnes (qui peuvent changer).
 
De la cellule AA1:AA25 je rentre les noms des personnes, en fonction d'horaires par l'intermédiaire d'une liste déroulante, hélas il m'arrive de mettre 2 fois le même nom (par étourderie).
 
Je ne connais pas VBA, quelqu'un peut-il me dire s'il est possible de faire une macro et éventuellement l'écrire, qui me donnerait les 25 noms, comme la liste déroulante lorsque je clique dans une cellule AA1 à AA25 et qui ne ferait apparaître que les noms qui n'ont pas été déjà affectés.
 
Merci par avance

mood
Publicité
Posté le 18-09-2005 à 18:18:41  profilanswer
 

n°1201953
galopin01
Posté le 18-09-2005 à 20:49:35  profilanswer
 

bonjour,
ce que tu demandes est probablement possible. Reste à trouver celui-qui pondra ça.
Si c'était pour moi dans cette situation, je me contenterai d'une macro qui empêche la saisie de doublons.
Macro à coller dans le module de la feuille concernée (à condition qu'il n'y ait pas déjà une Sub Worksheet_Change !)

Code :
  1. Private Sub Worksheet_Change(ByVal Target As Range)
  2. If Not Target.Count > 1 Then
  3. Set isect = Application.Intersect(Target, Range("AA1:AA25" ))
  4. If Not isect Is Nothing Then
  5. If Application.WorksheetFunction.CountIf(Range("AA1:AA25" ), Target) > 1 Then
  6. Target.ClearContents
  7. MsgBox "Doublon inadmis !"
  8. End If
  9. End If
  10. End If
  11. End Sub

Pour coller cette macro dans le module de feuille faire un clic droit sur l'onglet de cette feuille. En principe si tu ne connais pas VBA, le module est vide : Tu colles ce code.
Sinon s'il y a déjà des macros (mais pas de Sub Worksheet_Change) coller le code tout à la fin sur la première ligne vide.
S'il y a déjà une Sub Worksheet_Change il faudra faire un bricolage...
A+

n°1202622
rubycube
Posté le 19-09-2005 à 17:03:47  profilanswer
 

Bonjour,
 
Merci pour ta réponse, je vais essayer cela en attendant l'oiseau rare.
 
A+

n°1203895
AlainTech
Pas trouvé? Cherche encore!
Posté le 20-09-2005 à 23:10:24  profilanswer
 

Pour ma part, je ne travaille jamais avec des listes déroulantes dans la feuille mais je crée un formulaire avec, éventuellement, des combo qui se chargent avec les contenus autorisés (pris sur une feuille "Paramètres" ).
 
Tous les tests sont possibles à partir de là.
N'ayant pas le contenu de la feuille sur laquelle tu travailles, je ne serai pas l'oiseau rare cette fois-ci.

n°1204643
rubycube
Posté le 21-09-2005 à 18:16:17  profilanswer
 

Bonjour,
 
J'ai trouvé plus simple pour éviter les doublons, je fais une mise en forme conditionnelle avec NB.SI, cela m'indique si je mets un nom déjà
affecté
Merci encore pour toutes vos réponses


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Validation de liste dans une cellule

 

Sujets relatifs
Valeur de liste pour menu deroulant.Resultat d'une requete parametre dans zone de liste !!
Ajouter un élément à une liste déroulanteEnlever les doublons d'une liste
comment recup valeur d'un cellule en cliquantRécupération d'une liste de fichier dans un Array
N° de ligne de la cellule active d'excel dans une macrovalidation menu deroulant
validation menu deroulantjtable,coordonées d'une cellule.
Plus de sujets relatifs à : Validation de liste dans une cellule


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR