XL 2016 Formule sur filtre

[tinet]

Bonjour le forum,

J'utilise une formule en automatique pour réaliser des filtres dans ma base de données

.Range("EA2").FormulaLocal = "=ET(JOUR(E56)=" & Day(MaDate) & ";MOIS(E56)=" & Month(MaDate) & ";ANNEE(E56)=" & Year(MaDate) & ";(G56=" & (Maliste) & ");(J56=" & (Maliste2) & "))"

Et voici ce que j'obtiens
=ET(JOUR(E56)=17;MOIS(E56)=7;ANNEE(E56)=2020;(G56=Privée );(J56=0))

Je dois corriger le filtre de la colonne G56 de cet manière en rouge

=ET(JOUR(E56)=17;MOIS(E56)=7;ANNEE(E56)=2020;(G56="Privée" );(J56=0))

mais Je n'arrive pas à l'écrire dans ma formule pour avoir Privé qui fait référence à MaListe entre guillemets
Maliste = Feuil2.Range("C3")
en C3 Il est écrit Privée
Maliste2 = Feuil2.Range("D2")
en D2 Il y a un chiffre ce qui ne pose pas de problème pour le filtre

 

[JHA]

Bonjour à tous,

je ne comprends rien mais peux-tu essayer de mettre =T("Privée").
Sinon peux-tu joindre un extrait de ton soucis sur fichier.

JHA

 

[tinet]

Ok dans mon code
En EA2 j'aigris une formule

Range("EA2").FormulaLocal = "=ET(JOUR(E56)=" & Day(MaDate) & ";MOIS(E56)=" & Month(MaDate) & ";ANNEE(E56)=" & Year(MaDate) & ";(G56=" & (Maliste) & ");(J56=" & (Maliste2) & "))"
Ce qui donne
=ET(JOUR(E56)=17;MOIS(E56)=7;ANNEE(E56)=2020;(G56=Privée );(J56=0))

Comment modifier FormulaLocal pour obtenir ceci

=ET(JOUR(E56)=17;MOIS(E56)=7;ANNEE(E56)=2020;(G56="Privée" );(J56=0))

En C3 c'est du texte

Maliste = Feuil2.Range("C3")