Instruction Filter dans un Tableau()

Bonjour à tous

Je tourne en rond depuis quelques temps.

Dans un tablo() j'ai des valeurs comme : 2, 3, 20, 210, 50, 5.....

J'aimerais récupérer les 2 avec l'instruction :

Code:

---

montablo= Filter(tablo, 2, True)

---

malheureusement les 20, 210, ... sont récupérés.
Est ce possible de n'obtenir que les 2 ?
(J'ai cherché avec Option Compare .... , mais rien à faire)

Merci de vos réponses

Eric

bonjour edelweisseric le forum peut être un truc comme cela!!

Code:

---

montablo = Filter(Left(tablo, 1), 2, True)

---

Bonjour à tous
Bonjour laetitia

Merci pour cette réponse rapide ( pas comme moi pour y répondre ;). )

Une précision, quand il y a 12, le problème est le même.

J'ai essayé ton code, mais ...... erreur 13

Eric

Bonjour,
Quel est le but pour récupérer les "2", tu n'aurais aucune indications quand à leurs "situation" dans le tableau et de ce fait pratiquement inexploitable.
Supposant que ton tablo() soit 10,2,21,2,16,2,15,2
et suivant ce que tu cherche à faire tu aurais...(qui n'est pas possible avec Filter)

Code:

---

1 2 3

montablo(0) = 2 montablo(1) = 2 montablo(2) = 2

---

??
A+

Bonjour à tous
Bonjour laetitia, LeForestier

Citation:

---

Envoyé par LeForestier

Bonjour,
Quel est le but pour récupérer les "2", tu n'aurais aucune indications quand à leurs "situation" dans le tableau et de ce fait pratiquement inexploitable.
Supposant que ton tablo() soit 10,2,21,2,16,2,15,2
et suivant ce que tu cherche à faire tu aurais...(qui n'est pas possible avec Filter)

Code:

---

1 2 3

montablo(0) = 2 montablo(1) = 2 montablo(2) = 2

---

??
A+

---

Ce que je recherche est le nombre de 2 et non leur emplacement. C'est la seule solution que j'ai trouvée, avec ensuite cette instruction

Code:

---

nb = UBound(montablo)

---

Si il y a une méthode moins "orthodoxe" je suis preneur, sinon je ferai une boucle.

Une petite indication supplémentaire, les informations dans le tablo() sont "logiquement" triées.

Merci d'avance

Eric

bonjour edelweisseric LeForestier le forum je pense qu'il faudrait zipper un exemple en page 1 tes données en page 2 le résultat désire cela serait plus simple a mon avis!!

Bonjour à tous
Bonjour laetitia, LeForestier

Merci laetitia, mais je ne voudrais pas écrire sur une feuille. Je garderais la boucle, si je n'ai pas d'autre solution.

Mignon ton avatar !!! Tu y ressembles ? ;)

Eric

Bonjour,

Votre problème est sans doute maintenant résolu, si c'est la cas pensez à cliquer sur "Résolu" sinon à toutes fins utiles :

Code:

---

1 2 3 4 5 6 7 8 9 10

For i = 0 To 100 valeur = CStr(tablo(i)) lng = Len(tablo(i)) For n = 1 To lng num = Mid(tablo(n), 1, n) If num = "2" Then nb = nb + 1 End If Next n Next i

---

Bonsoir à tous
Bonsoir jacques_jean

Mon problème est réglé avec une boucle, et un compteur (ce que j'expliquais). J'avais espéré une solution beaucoup plus courte, et plus simple, mais apparemment cela n'existe pas.

Merci pour ton code mais, sans l'avoir testé, je pense qu'il compte le "2" de "12" et je ne le voulais pas. Je garde ta solution car je peux également avoir besoin de cette manip.

Eric

Bonsoir,

Le principal est que vous ayez trouvé votre solution.

Mais vous aviez écrit :

Citation:

---

Ce que je recherche est le nombre de 2 et non leur emplacement. C'est la seule solution que j'ai trouvée, avec ensuite cette instruction

---

C'est la raison pour laquelle le "2" de "12" est pris en compte.
Cela dit, il est très facile de modifier pour ne prendre en compte que celui que l'on veut.

Bonsoir

Comme quoi j'aurais du être beaucoup plus précis, le "Ce que je recherche est le nombre de 2 et non leur emplacement" était, pour moi, l'emplacement dans la "colonne" ou "ligne" du tableau, et non dans la "cellule".

Merci encore

Eric