validation, worksheet_change et fonction perso

[h_des_steppes]

Bonjour,

J'ai un probleme pour faire fonctionner la validation de cellule, les fonctions perso et une macro worksheet_change ensemble.

Mon probleme :
-> La macro worksheet change permet d'avoir des couleurs de fonds en fonction du contenu (+ de 3 couleurs d'ou l'impossibilité d'utiliser format conditionnel)
-> Une fonction perso
-> La validation de contenu de cellule pour aider la saisie.

tout cela ne marche pas ensemble. Je vous mets mon fichier en attaché.

Faite le test :
-> Vous taper H2 ou H3 dans une cellule du tableau : la couleur de fond change correctement.
-> Vous selectionnez H2 ou H3 dans un cellule du tableau : pas de changement de couleur.
-> Vous supprimez la colonne V_H3 (la fonction perso). Tout marche...

Des idées ?

Merci !

 

[jeanpierre]

Re : validation, worksheet_change et fonction perso

Bonsoir ou bientôt bonjour h_des_steppes, le forum,

Je viens de tester tel que tu précises, en saisie ou par les listes de B à K et lignes 8 à 14, tout fonctionne normalement. (pour H1, 2 et 3)

Par contre, ce que je ne comprends pas, pour la MCF, c'est pourquoi tu as deux mises en forme pour deux éléments différents.. Tu aurais pu abréger avec un SI(OU.......... dans La formule est, plutôt que dans La valeur de la cellule est.... (deux fois)

Donc, précises ton souci car pour moi tout est bon.

A te lire

Jean-Pierre

 

[fred65200]

Re : validation, worksheet_change et fonction perso

bonjour h_des_steppes,

J'ai testé votre classeur,

1 - je ne sais pas si c'est voulu mais les cellules A9:C14 sont déjà formatées.
La "mise en forme conditionnelle" sans remplissage ne recouvre pas les fonds existants (RTT, CA, SUR, Sad, FOR).

2 - Pour plus de visibilité et peut être moins de cause de conflit j'ajouterais

   Next code
Next cellule

dans les boucles imbriquées.

Sinon tout fonctionne correctement, à la saisie et avec la liste de validation.

3 - Sauf si vous sélectionnez F8:F14, saisissez h3 en F8 et validez par Ctrl + ENTER, le formules de la colonne L ne se mettent pas à jour (avec H3 oui).

L'utilisation de UCase réglerait le problème majuscule / minuscule.

       If code.Value = [COLOR="Navy"]UCase([/COLOR]cellule.Value[COLOR="Navy"])[/COLOR] Then

cordialement
fred65200

 

[h_des_steppes]

Re : validation, worksheet_change et fonction perso

Hello,

Alors, voici une nouvelle version de fichier sans le format conditionnel. (J'avais fait des tests que j'ai oublié de supprimer).

Mais chez moi ca ne marche toujours pas.

Je vous envoie une petite video. Le son est pas top, la qualité non plus, mais bon, c'est comprehensible....

dailymotion/videoexcel

Merci pour votre aide en tout cas !

 

[fred65200]

Re : validation, worksheet_change et fonction perso

bonjour h_des_steppes,

J'ai refais quelques tests, me suis arraché les cheveux.
Planter l'ordinateur, ...

Et ai opter pour réécrire votre formule perso.
Une formule matricielle peut faire exactement ce que fait votre fonction

pour L9 =SOMME(SI(($A9:$K9="H3")*($A$6:$K$6="V");1;0)) à valider par ctrl + maj + enter.


Le bout de code ci-dessous insère une formule matricielle dans les cellules L9:L14.

Sub V_H3()
For i = 9 To 14
Cells(i, 12).FormulaArray = "=SUM(IF((RC1:RC11=""H3"")*(R6C1:R6C11=""V""),1,0))"
Next
End Sub

Il semble que ça marche (testé sur Excel 2007).

NB vous pourriez peut être ajouter une cellule " " espace ou "" vide sans mise en forme dans la zone code pour effacer et supprimer la mise en forme.

Salutations
fred65200

 

[Banzai64]

Re : validation, worksheet_change et fonction perso

Bonjour

Teste

 

[fred65200]

Re : validation, worksheet_change et fonction perso

bonsoir, bonjour Banzai64,

Nous sommes arrivés à la même conclusion, avec des formules différentes.

Je n'ai pas encore bien intégré la formule SOMMEPROD.

Bonne nuit
fred65200

 

[Banzai64]

Re : validation, worksheet_change et fonction perso

Bonjour fred65200

Moi je découvre encore SommeProd et je suis ignare avec les matricielles

Mais je me soigne

Bonne nuit

 

[h_des_steppes]

Re : validation, worksheet_change et fonction perso

Oui, merci beaucoup ! Ca marche.

Bon, je comprends toujours pas pourquoi ma solution ne marche pas, mais avec ces solutions alternatives sans formule perso, ca fait l'affaire.

Va falloir que je comprenne ces formules matricielles maintenant 🙂
(pour la prochaine fois) !

Milles mercis !

 

[fred65200]

Re : validation, worksheet_change et fonction perso

bonsoir h_des_steppes

utilise plutôt SOMMEPROD de Banzaï64, car tu pourras incrémenter ta formule.

Cordialement
fred65200