Discussion :

[adrien1987]

Bonjour

J'aimerais effectuer un filtre sur l'onglet Janvier sur la ligne B4 directement via un user avec une base de nom qui se trouve sur un autre onglet "maintenance"
Ci-dessous mon code filtré manuellement avec les noms: ligne 10

Est-il possible de lui indiquer des n° cellules directement : ex Array(A1:A10) ?
Pourquoi cette question, car les noms changent régulièrement dans mon tableau planning, cela m'évite de changer le code macro.
Merci pour votre aide

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub amde()
'
' amde Macro
'

'
    Range("Janvier[#Headers]").Select
    Selection.AutoFilter
    ActiveSheet.ListObjects("Janvier").Range.AutoFilter Field:=1, Criteria1:= _
        Array("Bouregba", "Didion", "Grandemange", "Richet"), Operator:=xlFilterValues
    Range("B48").Select
    Selection.AutoFilter
    ActiveSheet.Range("$B$49:$AH$55").AutoFilter Field:=1, Criteria1:="AMDE"
End Sub

test planning Agent.xlsm

[Alex020181]

Bonjour,

As-tu regardé ma réponse dans ton fil précédent ?
Est-ce bien ce que tu voulais ?

https://www.developpez.net/forums/d2...eres-complexe/

[adrien1987]

Bonjour,

As-tu regardé ma réponse dans ton fil précédent ?
Est-ce bien ce que tu voulais ?

https://www.developpez.net/forums/d2...eres-complexe/

Bonsoir Alex

Dsl je n'ai pas eu le temps de répondre ! je te confirme que ton boulot me va nickel

Mille merci

j'ai voulu gagner du temps avec ce sujet, je t'aurais répondu demain Sory vraiment

Bonne soirée à toi

[Alex020181]

OK cool si c'est bon.

Voilà pour tes filtres.
Ton formulaire fonctionne (avec tous ses boutons).

Attention pour la prise en compte des équipes. Je me suis basé sur le format des tes données actuel. Le dimension et adresse des tableaux des équipes sera à revoir si tu modifie ce format (je te conseille d'ailleurs de le revoir).

[Alex020181]

Et voilà avec la modification de la feuille de la liste des équipes.
1 colonne = 1 équipe

Tu as juste à compléter ces colonnes en ajoutant ou supprimant des noms.

La première réponse filtre en gardant ton format (tu peux remplacer un nom par un autre mais pas ajouter) mais tu te retrouves bloqué pour modifier le nombre de personnes par équipe.
Cette seconde réponse te permet de modifier les noms des personnes des équipes mais surtout d'en ajouter et supprimer (feuille "maintenance_2").

Teste et dis nous.


PS; on aurait également pu envisager un tableau de ce type pour constituer les équipes. Cela t'aurait permis de, si besoin, positionner une même personne dans plusieurs équipes sans avoir à saisir x fois son nom comme actuellement. (j'ai coché au hasard les noms dans les équipes pour l'illustration).

[adrien1987]

Bonjour Alex

Je viens de tester ton travail, il est tout simplement parfait sincèrement, de plus j'ai vu que tu m'as consacré une bonne partie de nuit
ça se voit que tu maitrises parfaitement VBA J'aimerais te prendre 60 % de ton savoir !!

J'aime vraiment ta dernière idée d'avoir un tableau avec des croix !
​

Et voilà avec la modification de la feuille de la liste des équipes.

Cette seconde réponse te permet de modifier les noms des personnes des équipes mais surtout d'en ajouter et supprimer (feuille "maintenance_2").

J'ai encore une petite faveur à te demander
Quand mon user est activé est sur la feuille, je ne peux pas modifier le tableau!
Connais-tu le code ?
-Pour rendre le classeur modifiable
-Avec ouverture de l'user à l'ouverture du classeur
-Rendre impossible de fermer l'user


Encore un grand merci de ton aide

[adrien1987]

Je viens de faire le test en dupliquant le mois de Janvier pour continuer les mois de l'année.
Résultat : Les filtres des agents ne marche pas "débogage" avec le userfrom.

Cela est-il grave docteur ?
Faut-il rajouter les différents onglets dans tes macros ? Janvier, février, Mars etc..

[Alex020181]

Tu passes en débugage car tu n'as pas créé Février sur le même modèle que Janvier.

Je suis quasiment certain que tu n'as pas créer le tableau "Février" dans ta page ou bien que tu ne l'as pas nommé "Février".
Le code filtre le mois de la page affiché en prenant en compte le nom de la feuille comme nom de tableau contenant les données. J'ai prit modèle sur Janvier.

Je te rassure je n'ai pas bossé toute la nuit pour toi.

Sur mon PC quand le formulaire est affiché je peux sans problème modifier les données de la feuille Excel en arrière plan.

[adrien1987]

Bonjour Alex
Tu as raison le mois de Février n'était pas créé !
J'ai dupliqué le mois de janvier ce matin après réception de boulot d'hier

-Nom de l'onglet Février
-Changement de la cellule B2 avec le mois correspond à l'onglet

Toujours débogage !! ci-joint le fichier

Merci de ton aide

test planning Agent(2) (1).xlsm

[Alex020181]

C'est bien ce que je disais.
Ton tableau de la feuille "Janvier" s'appelle du nom de la feuille. Donc "Janvier". Donc je me suis servi de cet exemple.
Par contre ton tableau de la feuille "Février" ne s'appelle pas du nom de la feuille. Donc "Janvier2" et pas "Février"...

[adrien1987]

Ok merci pour cet exemple parlant

Résultat :il faut que je change tous simplement le nom de la feuille dans ce gestionnaire ?

[adrien1987]

Super ça marche nickel

Je vais continuer les prochains mois, je te tiens au courant de la suite.

Merci
Bon we