Combinaisons d'un tableau dans un autre tableau

jtchoucky Messages postés 1 Date d'inscription mercredi 12 février 2003 Statut Membre Dernière intervention 12 juin 2003 - 12 juin 2003 à 11:45
Delbeke Messages postés 200 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 18 novembre 2005 - 12 juin 2003 à 13:53
Bonjour a tous!

C'est la 1ere fois que j'utilise ce forum et j'aurais une ptite question:

Sachant que j'ai un tableau1={3,3,2,2,2,2,1,1,1,1} et un autre tableau2={3,2,2,1,1,1},je cherche a trouver dans le tableau1,toutes les combinaisons du tableau2.

Si qq'un pouvait plancher sur ce probleme,ca serait cool parce que moi,je suis au bord du suicide!Je me suis mis a boire pour essayer d'oublier que j'y arrive pas!

PS:C'est peut etre aussi pour ca que j'y arrive pas!!

1 réponse

Delbeke Messages postés 200 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 18 novembre 2005
12 juin 2003 à 13:53
Une idée comme çà en passant
Créer deux variables temporaire en string

Dim TbleSour as string
Dim TbleRech as string

remplir les trings avec qqe choise comme:

For ipnt=0 to ubound(Tableau1)
tblesour=tblesour & cstr(tableau1(ipnt)) & "|"
next
For ipnt=0 to ubound(Tableau2)
tblerech=tblerech & cstr(tableau2(ipnt)) & "|"
next
Ensuite on fait un instr(
iPosit=1
do iPosit = instr(iposit+1,tblesour,tbledest)
debug.print iposit
loop until iposit=0

Jean-Luc
0
Rejoignez-nous