Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Re : Compter valeurs uniques + Condition
Je ne sais faire les tableaux.
J'aimerais plutot les indiquer dans l'onglet à enlever, dans une colonne, la C par exemple.
Mais je n'ai pas compris où mettre le IF et comment déterminer la clé.
Il me reste 1H snif snif :(
Re : Compter valeurs uniques + Condition
Je n'ai pas compris :(
quels sont les deux premiers paramètres dont on parle ?
Comment supprime t on des éléments du dictionary ?
Re : Compter valeurs uniques + Condition
Super merci beaucoup!
Maintenant, je ne comprends pas vraiment comment fonctionne la fonction NbUnique que vous avez créée.
Si je souhaite exclure quelque N° de locaux, que faut-il rajouter dans la fonction ?
Les N° de locaux à exclure pourront être...
Re : Compter valeurs uniques + Condition
Alors est-ce que ma ligne Set suffit ci-dessous ?
Le set me demande un =
Sub CountUniqueItem()
Set FExtrac = Worksheets("EXTRACTION")
FPoint.[E9].Value = NbUnique(FRésu.[B2])
FPoint.[G9].Value = NbUnique(FRésu.[C2])
FPoint.[E14].Value =...
Re : Compter valeurs uniques + Condition
Ok je comprends mieux et ça a l'air moins compliqué.
EDIT : Oh mais ça m'a l'air bon dans ma grande extraction de 17000lignes !!
EDIT 2 : J'ai trouvé un HIC avec les renommages mnémoniques. Je fais des extractions régulières de SAP et je dois à...
Re : Compter valeurs uniques + Condition
Tous les coups me posent problème lol. Non mais je n'avais pas compris que je devais faire ça.
Je dois renommer toutes les feuilles donc ? Mais ça change quoi précisément pour la macro du module 2
Re : Compter valeurs uniques + Condition
Oui il ne faudrait pas les comptabiliser (j'ai vu qu'actuellement elles le sont)
Oui c'est bien là le but des Forums. Et puis je m'exprime mal je sais, alors je n'ai pas TOUT fait ;) J'essaie d'adapter comme je peux et comme je comprends surtout...
Re : Compter valeurs uniques + Condition
Ce n'est pas moi qui ai fait ces procédures.... Je n'en suis absolument pas capable. Mais si vous estimez que ce n'est pas correcte, n'hésitez pas à modifier une bonne fois pour toute le fichier ! Ce serait beaucoup mieux et plus rapide !
Le module 2...
Re : Compter valeurs uniques + Condition
Voici le fichier : bon je ne comprends pas, je n'ai plus de message d'erreur mais le compte est toujours le même qu'avant, c'est à dire qu'il ne prend pas en compte la condition.
Cf. Module 2
Re : Compter valeurs uniques + Condition
Non mais jai fait ce que vous mavez dit...
La premiere erreur est partie, mais la cest incompatibilite de type :(
Re : Compter valeurs uniques + Condition
Ok j'ai bien compris par contre, peut on éviter de cocher cette case ? Je veux dire que les personnes qui vont utiliser ce fichier ne l'auront pas cochée......
Le post #13 doit remplacer le début de mon module du post #12 c'est ça ? J'ai un peu de mal...
Re : Compter valeurs uniques + Condition
Du coup, je ne sais pas ce que tu as compris lol
J'ai une erreur de compilation à la première ligne (en jaune) et en sélection le With New Scriopting.Dictionnary.
Je reformule :
je voudrais juste que ma maccro compte les valeurs uniques des...
Re : Compter valeurs uniques + Condition
Ce n'est pas dans ce module que je souhaitais la modification par contre !
C'est dans le module 2 :
Function NbUnique&(Rg As Range)
Dim Rc As Range
If Rg.Count = 1 Then _
With Rg.Parent: Set Rg = .Range(Rg...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.