Comme il existe une fonction vba formulalocal pour mettre en place une form=
ule, Est-ce qu'il existe un equivalent pour mettre ne place des MFC?
J'ai cette MFC =E0 mettre en place:
=3DET(MOYENNE($L13:$Q13)>=3D2;NB($L12:$Q12)>=3DNBVAL($L$11:$Q$11);MOYENNE($=
L12:$Q12)>=3D2)
La plage s'applique de D12:K12
Même chose, l'erreur reste la même. J'ai essayé de déclarer les variables plages en as string mais c'est en core la même chose. J'ai apporté une modif dans la ligne: Plage1 = .Range(Cells(11, deb + 1), Cells(11, fin + 11)).AddressLocal(Row Absolute:=True)
J'ai changé AddressLocal(RowAbsolute:úlse)en AddressLocal(RowAbsolute :=True)car j'avais besoin d'une valeur absolue de la plage.
Mystère car la formulation que tu m'as donnée est la bonne.
JP
Isabelle,
Même chose, l'erreur reste la même.
J'ai essayé de déclarer les variables plages en as string mais c'est en core la même chose.
J'ai apporté une modif dans la ligne:
Plage1 = .Range(Cells(11, deb + 1), Cells(11, fin + 11)).AddressLocal(Row Absolute:=True)
J'ai changé AddressLocal(RowAbsolute:=False)en AddressLocal(RowAbsolute :=True)car j'avais besoin d'une valeur absolue de la plage.
Mystère car la formulation que tu m'as donnée est la bonne.
Même chose, l'erreur reste la même. J'ai essayé de déclarer les variables plages en as string mais c'est en core la même chose. J'ai apporté une modif dans la ligne: Plage1 = .Range(Cells(11, deb + 1), Cells(11, fin + 11)).AddressLocal(Row Absolute:=True)
J'ai changé AddressLocal(RowAbsolute:úlse)en AddressLocal(RowAbsolute :=True)car j'avais besoin d'une valeur absolue de la plage.
Mystère car la formulation que tu m'as donnée est la bonne.
JP
JP
Isabelle, J'ignore si cette remarque est intéressante. Dans le code en pas à pas, au moment de l'erreur 1004,l'expression "xlExp ression" est =2 Je parle de la ligne: .FormatConditions.Add Type:=xlExpression, Formula1:="=ET(MOYENNE(" & Plage3 & ")>=2;NB(" & Plage2 & ")>=NBVAL(" & Plage1 & ");MOYENNE(" & Pl age2 & ")>=2)"
JP
Isabelle,
J'ignore si cette remarque est intéressante.
Dans le code en pas à pas, au moment de l'erreur 1004,l'expression "xlExp ression" est =2
Je parle de la ligne:
.FormatConditions.Add Type:=xlExpression, Formula1:="=ET(MOYENNE(" & Plage3 & ")>=2;NB(" & Plage2 & ")>=NBVAL(" & Plage1 & ");MOYENNE(" & Pl age2 & ")>=2)"
Isabelle, J'ignore si cette remarque est intéressante. Dans le code en pas à pas, au moment de l'erreur 1004,l'expression "xlExp ression" est =2 Je parle de la ligne: .FormatConditions.Add Type:=xlExpression, Formula1:="=ET(MOYENNE(" & Plage3 & ")>=2;NB(" & Plage2 & ")>=NBVAL(" & Plage1 & ");MOYENNE(" & Pl age2 & ")>=2)"
JP
MichD
Un fichier exemple avec la même procédure VBA que je te proposais plutôt! http://cjoint.com/?DDpncrG2LBR
Regarde la formule contenue dans la cellule en jaune et la formule de la mise en forme conditionnelle.
Un fichier exemple avec la même procédure VBA que je te proposais plutôt!
http://cjoint.com/?DDpncrG2LBR
Regarde la formule contenue dans la cellule en jaune et la formule de la
mise en forme conditionnelle.
Un fichier exemple avec la même procédure VBA que je te proposais plutôt! http://cjoint.com/?DDpncrG2LBR
Regarde la formule contenue dans la cellule en jaune et la formule de la mise en forme conditionnelle.
JP
Bonjour Denis,
Démonstration concluante! Je vais éviter .FormatConditions.Delete car j'ai d'autres mises en forme sur les cellules. Ceci dit, en intégrant la partie de code j'ai maintenan t l'erreur 1004 sur la ligne .FormatConditions.Delete.
Je suis un peu dépassé je l'avoue.
JP
Bonjour Denis,
Démonstration concluante!
Je vais éviter .FormatConditions.Delete car j'ai d'autres mises en forme sur les cellules. Ceci dit, en intégrant la partie de code j'ai maintenan t l'erreur 1004 sur la ligne .FormatConditions.Delete.
Démonstration concluante! Je vais éviter .FormatConditions.Delete car j'ai d'autres mises en forme sur les cellules. Ceci dit, en intégrant la partie de code j'ai maintenan t l'erreur 1004 sur la ligne .FormatConditions.Delete.
Je suis un peu dépassé je l'avoue.
JP
MichD
| Ceci dit, en intégrant la partie de code j'ai maintenant | l'erreur 1004 sur la ligne .FormatConditions.Delete.
Si tu n'en as pas besoin, tu supprimes cette ligne de code.
Tu as combien de mises en forme différente sur cette cellule? Si tu as déjà 2 autres formules dans celles déjà existantes, peux-tu toujours utiliser le nom du paramètre : "Formula1" si elle représente en fait la 3 Er formule? Pourquoi ne pas essayer "Formula3" ?
Dans la première ligne de code, tu utilises : (.FormatConditions.Count) tandis que dans la deuxième, tu emploies (1) . Est-ce que c'est vraiment ce que tu veux faire?
Au-delà ça, je ne peux pas deviner ce qui bloque....
| Ceci dit, en intégrant la partie de code j'ai maintenant
| l'erreur 1004 sur la ligne .FormatConditions.Delete.
Si tu n'en as pas besoin, tu supprimes cette ligne de code.
Tu as combien de mises en forme différente sur cette cellule?
Si tu as déjà 2 autres formules dans celles déjà existantes, peux-tu
toujours utiliser le nom du paramètre : "Formula1" si elle représente
en fait la 3 Er formule? Pourquoi ne pas essayer "Formula3" ?
Dans la première ligne de code, tu utilises : (.FormatConditions.Count)
tandis que dans la deuxième, tu emploies (1) . Est-ce que c'est vraiment
ce que tu veux faire?
Au-delà ça, je ne peux pas deviner ce qui bloque....
Tu as combien de mises en forme différente sur cette cellule? Si tu as déjà 2 autres formules dans celles déjà existantes, peux-tu toujours utiliser le nom du paramètre : "Formula1" si elle représente en fait la 3 Er formule? Pourquoi ne pas essayer "Formula3" ?
Dans la première ligne de code, tu utilises : (.FormatConditions.Count) tandis que dans la deuxième, tu emploies (1) . Est-ce que c'est vraiment ce que tu veux faire?
Au-delà ça, je ne peux pas deviner ce qui bloque....
JP
Denis,
Avec tes conseils, j'ai réussi à faire passer la MFC une fois et depuis plus rien. J'ai reproduis la situation avec une boucle. Faut-il effacer les mfc et toutes les recréer?
http://cjoint.com/?DDprH79MQnC
L'erreur 1004 n'est plus d'actualité mais c'est l'indice FormatConditions (1).Interior qui pose problème.
JP
Denis,
Avec tes conseils, j'ai réussi à faire passer la MFC une fois et depuis plus rien.
J'ai reproduis la situation avec une boucle.
Faut-il effacer les mfc et toutes les recréer?
http://cjoint.com/?DDprH79MQnC
L'erreur 1004 n'est plus d'actualité mais c'est l'indice FormatConditions (1).Interior qui pose problème.
Avec tes conseils, j'ai réussi à faire passer la MFC une fois et depuis plus rien. J'ai reproduis la situation avec une boucle. Faut-il effacer les mfc et toutes les recréer?
http://cjoint.com/?DDprH79MQnC
L'erreur 1004 n'est plus d'actualité mais c'est l'indice FormatConditions (1).Interior qui pose problème.
Je comprends bien mais comment remettre les autres en place. L'enregistreur de macro ne donne aucune information, il ne fait rien. Est-ce possible au moins?
Merci JP
Denis,
Je comprends bien mais comment remettre les autres en place.
L'enregistreur de macro ne donne aucune information, il ne fait rien.
Est-ce possible au moins?
Je comprends bien mais comment remettre les autres en place. L'enregistreur de macro ne donne aucune information, il ne fait rien. Est-ce possible au moins?
