jtchoucky
Messages postés1Date d'inscriptionmercredi 12 février 2003StatutMembreDernière intervention12 juin 2003
-
12 juin 2003 à 11:45
Delbeke
Messages postés200Date d'inscriptionjeudi 19 décembre 2002StatutMembreDernière intervention18 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!!
Delbeke
Messages postés200Date d'inscriptionjeudi 19 décembre 2002StatutMembreDernière intervention18 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