Discussion :

[Amo255]

Bonjour Boisgontierjacques

Cette discussion date un peu, mais j'aurais besoin d'aide pour votre code. Je ne maîtrise pas VBA, je m'exerce à l'aide de l'enregistreur ou de trouvailles comme ici
J'ai utilisé celui ci, qui faisait parfaitement son job, toutefois les besoins ont évolués.

Maintenant certaines personnes doivent voir dans le filtre 2 voir 3 différentes initiales.
Exemple je devais voir les cellules contenant GBE, maintenant je dois voir les cellules contenant GBE et/ou FHA

je suppose qu'il faut ajouter quelque part un "And" mais j'en suis absolument pas sure et je ne saurais pas où le mettre.

Code :

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

1
2
3
4
5
6
7
8
9
10
'chercher l'initiale dans la table de correspondance (ici sur feuille 2)
    Nom = Application.UserName
    initiales = Application.VLookup(Nom, [utilisateurs], 2, False) ' table correspondance
    If Not IsError(initiales) Then
        Sheets(2).Cells.AutoFilter Field:=1, Criteria1:=initiales
    End If
 
       Else
        MsgBox "vous n'êtes pas autorisé à utiliser ce fichier"
...

Dans l'attente de vous lire

Bonne après-midi

[MarcelG]

Bonjour amo,
(bienvenue sur ce forum)

La solution la plus simple serait alors d'utiliser un filtre éléboré.
Voir le tutoriel de l'ami Philippe

Filtres élaborés

[Amo255]

Bonjour amo,
(bienvenue sur ce forum)

La solution la plus simple serait alors d'utiliser un filtre éléboré.
Voir le tutoriel de l'ami Philippe

Filtres élaborés

Bonjour MarcelG

Merci pour votre réponse. Le filtre élaboré était la piste que j'étais entrain de creuser. mais mon code fait appel au nom utilisateur (nom d'office) et donc je ne suis pas sure que ce soit la bonne piste, car le nom d'utilisateur n'est pas dans la plage à filtrer, uniquement dans la table de correspondance/zone de critères.
Ce vais lire le tutoriel pour voir si je trouve mon bonheur.

Bonne journée

[MarcelG]

Salut,

Il suffit d'enrichir la zone de critères des initiales, calculées sur chaque nom, cherchées (par VBA ou non) et utiliser les conditions et/ou comme le montre le tutoriel.
Il serait peut être nécessaire de définir la zone de critères en fonction du nombre de noms cherchés.

[Amo255]

Salut,

Il suffit d'enrichir la zone de critères des initiales, calculées sur chaque nom, cherchées (par VBA ou non) et utiliser les conditions et/ou comme le montre le tutoriel.
Il serait peut être nécessaire de définir la zone de critères en fonction du nombre de noms cherchés.

Je suis désolé je ne comprends pas ce que vous proposez.
malheureusement je ne peux pas joindre le fichier (fichier professionnel)
Ce fichier est envoyé à différentes personnes et chacun doit voir seulement ce qui le concerne.

Ma feuille FNC (onglet 2) plusieurs lignes et colonnes.
Dans la colonne A j'ai mes initiales. (FHA, GBE...)
C'est la colonne A qui se filtre automatique suivant l'utilisateur qui ouvre le fichier.

Ma feuille2 est ma table de correspondance, en colonne A, j'ai Prénom et Nom de Famille (comme reprit dans office Excel) et dans la colonne B les initiales qui lui sont dédiées
ma feuille2 serait alors ma zone de critères, où se trouve déjà les initiales pour chaque nom...

Exemple
Colonne A Colonne B
Pierre Dupont *FHA*
Michel Schmit *GBE*
etc

Lorsque Pierre Dupont ouvre le fichier à partir de son pc, il voit à l'ouverture du fichier, que les lignes dont la colonne A contient FHA. La feuille est protégée, l'utilisateur ne peut pas modifier le filtre ou tout autre chose

Et je n'arrive pas à trouver, pour faire en sorte que Pierre Dupont voit à l'ouverture du fichier, les lignes dont la colonne A contient p.ex. FHA & GBE

[MarcelG]

OK. La problématique est claire

Au demeurant, nous sommes d'accord.

A l'ouverture du classeur, une recherche est effectuée sur le Username de l'utilisateur dans la base utilitaire.
Au regard de cette donnée figureront dans la colonne suivante ses initiales, dans la colonne suivante les initiales autorisées par cet identifiant, d'autres initiales éventuelles dans la 4ème colonne.
Ces 2 ou 3 colonnes retournant les initiales autorisées vont enrichir la zone de critères.

.......
ID Initiales1 initiales2
Fred mrc pol
.......

Si Fred est l'id machine (Username) alors le filtre élaboré s'effectuera sur une zone de critères comprenant mrc et pol

Sans évoquer VBA, peux-tu confirmer que l'on peut développer dans cette voie pour répondre à ton besoin.

(On va y arriver)