XL 2019 Chargement suite dispatching d'onglets

[rmjunivers]

Bonsoir la famille,

Besoin d'aide j'ai une ancienne macro qui me permet de créer les onglets et charger les données suivant les critères elle marche bien. Maintenant je l'utilise pour les mêmes besoins avec les données différentes les onglets dont créés mais ils sont tous vide.

Merci de votre aide pour voir les données aussi chargées svp. je joind le fichier

 

[Phil69970]

Bonjour @rmjunivers

Je te propose ce fichier

Merci de ton retour

 

[Zon]

Salut,

D'aprés ce que je comprends , tu veux filtrer par DESC_READING_CENTER.

En colonne G tes valeurs sont en numériques, alors que ta formule de supprimeData veut comparer du texte avec les """.

Modifie juste cette ligne pour passer en numérique dans la formule.

.FormulaR1C1 = "=IF(RC[2]=""" & Nom & """,CHAR(166),0)"
' par
.FormulaR1C1 = "=IF(RC[2]=" & Nom & ",CHAR(166),0)"

A+++

 

[Phil69970]

Re

@Zon C'est la modif que j'ai faite dans mon fichier..... mais tu ne l'as pas ouvert ....😉

.FormulaLocal = "=SI(D2=" & Nom & ";CAR(166);0)"

 

[Zon]

Re

@Zon C'est la modif que j'ai faite dans mon fichier..... mais tu ne l'as pas ouvert ....😉

De mauvaise foi 😁 , moi je reste en R1C1...

Désolé, @Phil69970 , mais j'avais pas raffraichi la page..

A+++

 

[rmjunivers]

Me

Bonjour @rmjunivers

Je te propose ce fichier

Merci de ton retour

 

[rmjunivers]

Me

Bonjour

Merci beaucoup ça marche.

 

[Phil69970]

Bonjour

@rmjunivers

La logique est de valider le post contenant la réponse que tu as choisi et non pas ton propre post car tu n'as rien trouvé du tout sinon tu ne serais pas venu demander de l'aide 😵