Réattribution numéro de badge

Bonjour,

Nouveau sur le forum j'aurais besoin d'un peu d'aide concernant un fichier que nous utilisons au travail.

Celui-ci nous sert pour les visites, il comporte plusieurs colonnes (société/visité/nom,prénom/badge/heure arrivée et heure sortie).

J'ai amélioré le fichier en y incorporant un code couleur pour les sorties après une certaine heure.

La colonne "badge" recoit les numéros des badges distribués à l'arrivée avec un menu déroulant.

Les badges distribués sont automatiquements enlevés de cette liste quand ils sont attribués.

Là ou je coince, je n'arrive pas à réattribuer les badges dans la liste une fois le visiteur sortit.

Le numéro du badge doit toujours apparaitre dans la colonne badge mais il doit être disponible quand le visiteur est sortit, et j'aimerais que cette mise à disposition se fasse quand je rentre l'heure de sortie ( les heures d'entrée et de sortie se font déjà par un double clic).

Je joins mon fichier en PJ si quelqu'un peut m'aider sur ce coup, d'avance merci.

Cordialement.

Bonjour,

j'ai modifié la dernière macro de la feuille comme ceci pour effacer le contenu de la colonne E quand qqch est mis en colonne G ;

Private Sub Worksheet_Change(ByVal Target As Range)
    ' If Target.Column = 12 Then 'Si colonne L
      '  Call gh 'Appeler Macro
    ' End If

    If Target.Column = 7 Then 'Si colonne G
        Call gh 'Appeler Macro
    End If
    If Not Intersect(Target, Range("G4:G73")) Is Nothing Then
    If Target.Value <> "" Then
    Target.Offset(0, -2).ClearContents
    End If
    End If
End Sub

Si vous ne voulez pas que le n° soit effacé de la colonne E même quand la personne est sortie, alors ne modifiez pas votre macro et mettez plutôt ceci en J4 ;

SI(NB.SI($E$4:$E$202;I4)>0;SI(INDEX($G$4:$G$202;EQUIV(I4;$E$4:$E$202;0))="";"";I4);I4)

Bonjour,

Merci c'est exactement ce que je voulais, j'ai conservé juste la ligne en J4 car effectivement je ne voulais pas que le numéro s'efface en colonne E.

Par contre quelque soit le numéro de badge, si je l'attribue une première fois, pas de soucis il est bien enlevé de la liste déroulante, si je fais une sortie il est bien réintégré dans la liste.

Par contre si je l'attribue une seconde fois,il apparait toujours dans la liste dérouanle !.

Cordialement.

Alors mettre ceci en J4 (je n'ai pas testé votre dernier fichier, je suppose que c'est pareil que l'autre avec ma formule en plus) ;

=SI(NB.SI($E$4:$E$202;I4)>0;SI(SOMMEPROD(($E$4:$E$202=I4)*($G$4:$G$202=""))>0;"";I4);I4)

Re bonjour,

Effectivement le dernier fichier était le même avec votre formule.

Je viens de le modifier avec la dernière formule que vous m'avez fourni, ça marche exactementn comme je voulais , les badges n'apparaissent plus dans la liste déroulante s'ils sont de nouveau attribués.

Un grand merci pour votre aide.

Cordialement.

Bonjour VG86 et le forum
Bien que ce fil soit clos, je me permets de proposer une autre méthode, avec des Tableaux Structurés et la saisie des données par Formulaire.
A découvrir
Cdt
Papy Henri

Bonjour AFEH et merci d'avoir jeté un oeil mais la solution apportée par Doux Rêveur me convient parfaitement.

Je me permets néanmoins de revenir vers la communauté car le fichier fonctionne parfaitement avec les solutions proposées, cependant il me reste quand même un petit soucis et je vous pries de bien vouloir m'excuser par avance en demandant une nouvelle fois votre aide.

En effet celui dans sa version que nous utilisons , comporte 2 zones distinctes mais qui ont exactement la même fonction.

Une zone pour les visiteurs qui fonctionne parfaitement avec les modifications apportées.

La seconde zone concerne les salariés mais elle fonctionne sur le même principe que la première zone.

J'ai pensé qu'en transposant les formules de la première zone pour celles de la seconde zone cela marcherai, mais je n'ai absolument aucun menu déroulant.

J'ai un message d'eerue quand je veux valider mes données et je n'arrive pas à comprendre pourquoi, tout me semble correct.

"La source est reconnue comme érronée, voulez-vous continuer ?"

Cordialement.

Bonjour,

c'est votre NB.SI qui a un souci quand il n'y a que des chiffres, remplacez votre formule de validation des données en J6 par ;

=DECALER($Y$6;;;SOMMEPROD(($Y$6:$Y$75<>"")*1))

Merci Doux Rêveur de me consacrer un peu de temps car je ne suis pas un pro d'excel, j'ai remplacé la formule pour la validation des données,

En rentrant un numéro de badge, je n'ai plus de liste déroulante dans les cellules du dessous et j'ai une erreur en colonne V et W et aucun affichage des badges restants et triés en colonne X et Y.

Cordialement.

Vous avez oublié de bloquer la ligne en colonne V, mettre le signe $ devant 6 dans SOMMEPROD(($J$6 en V6.

Alors sauf erreur de ma part , il me semble bien que c'est le cas !

Cordialement.

Non, on le voit sur la capture, il manque le $ devant le 6. Le J est bloqué mais pas le 6.

Erreur à la con, et pourtant j'ai regardé plusieurs fois, comme quoi des fois un second regard compte, .

Un grand merci Doux Rêveur, à être focaliser sur un truc qui ne fonctionne pas on passe à côté d'une erreur toute bête!

Cordialement.

En tous les cas ça va grandement simplifier la vie au boulot, plutot que d'avoir des numéros de badges qui réappparraissent alors qu'ils sont déjà attribué, un énorme merci à Dioux Rêveur.

J'avais omis certaines informations en entête dans le fichier étant donné que c'est un site confidentiel défense mais la base est là

Cordialement..

De rien, content d'avoir pu aider la défense

Bonjour VG86 et Bravo @Doux rêveur pour sa solution.
Je joins quand même ma proposition avec formulaire. Elle pourrait intéresser d'autres.
Cdt
Papy Henri

Bonjour, aucun souci pour que ça profite à ceux qui seraient en recherche d'une solution, merci à vous 2.

Cordialement.