Ajouter des éléments à un tableau

[apt]

Bonsoir à tous,

Dans un tableau j'ai les lignes suivantes :

B-Pa-1
B-Pa-2
B-Pa-3
G-Pa-1
G-Pa-2
M-Pa-1


J'aimerais parcourir mon tableau pour ajouter des nouveaux éléments de telle façon à avoir un nouveau tableau avec les lignes suivantes :

B-Pa-1
B-Pa-2
B-Pa-3
G-Pa-1
G-Pa-2
M-Pa-1
B-Pa-4
G-Pa-3
M-Pa-2

Merci d'avance.

🙂

 

[pierrejean]

Re : Ajouter des éléments à un tableau

Re
Suite a problemes internet (je bosse sur le PC de ma petite-fille -10 ans d'age le PC-) je suis un peu en retard

Vois tout de même si cela fonctionne

par ailleurs il n'est pas impossible que des forumeurs soient interesses par ta solution il serait bien de la poster !

 

[apt]

Re : Ajouter des éléments à un tableau

Bonsoir pierrejean,

Je voix que tu n'as pas encore jeter le tablier 🙂

J'ai testé avec une nouvelle entrée (Par exemple Itl-pop--) et une erreur est signalée :

L'indice n'appartient pas à la sélection.

Pour la ligne suivante dans AjoutChoixTabList1() :

ReDim Tabajout(2, 1 To collec.Count)

Parce que le mot recherché "pop" n'existe pas.

Pour ma solution, elle s'est avérée non concluante après quelques tests !!!

Voilà !

Merci

🙂

 

[pierrejean]

Re : Ajouter des éléments à un tableau

Re

Vois si cela va cette fois (petit inconvenient dans le cas de nouveau code : une ligne vide dans la listbox)

 

[apt]

Re : Ajouter des éléments à un tableau

Bonjour pierrejean et tous le forum,

J'ai pu réussir, en cas d'une entrée non existante, d'éviter d'afficher la ListBox en écrivant directement dans la cellule active un nouveau code avec un "1" à la fin.

Mais après que j'ai ajouté du code pour essayer de l'adapter à mon fichier d'origine j'ai eu quelques pépins ...


1) par exemple quand je saisie : Lib-Stylo-- une erreur de :

Incompatibilité de type

à la ligne

Tableau(2, UBound(Tableau, 2)) = Cel.Offset(, 1).Value

Parce que : Tableau(2, UBound(Tableau, 2)) =""

2) Comment faire pour ajouter l'entrée saisie si celle-ci n'a pas de correspondance total dans Feuil2 :

Par exemple si j'ai dans la liste Iti-Pop-Set-Tr-1

Quand j'écris Iti-Pop-- il me sorte la liste suivante :

Iti-Pop-Set-Tr-1
Iti-Pop-Set-Tr-2

Pourrais-je avoir en plus une troisième ligne :

Iti-Pop-1

Merci d'avance 🙂

 

[apt]

Re : Ajouter des éléments à un tableau

Bonjour à tous,

Ca aavnce un peu.

J'ai pu ajouter l'entrée qui n'a pas de correspondance exact dans la feuil2 colonne B.

(exemple de Iti-Pop--)

Mais avec une interligne vide dans la ListBox !!!!

Pour le point 2) ca rame encore ...

 

[apt]

Re : Ajouter des éléments à un tableau

un p'tit Up !

 

[apt]

Re : Ajouter des éléments à un tableau

Salut à tous,

Y'a-t-il du nouveau ?

🙁

 

[apt]

Re : Ajouter des éléments à un tableau

Bonsoir pierrejean, le forum,

J’ai fait cet essai, mais j’ai le problème suivant :

Si j'ai dans la liste :

Ep-Huile-1 2.10

Et je voudrais vérifier l'existence de cette entrée :

Ovs-Huile--

On aura seulement dans la ListBox :

Ep-Huile-1 2.10
Ep-Huile-2

Normalement, il manque une ligne, celle de :

Ovs-Huile-1

Parce que la comparaison a été faite seulement sur le mot "Huile", sans tenir compte de la catégorie (Ep ou Ovs ).

Peut-être qu'il faut aussi faire une vérification de l’exactitude de la catégorie (Ovs), en plus de la désignation de l’article (Huile) dans ce cas là, non ?

Merci d'avance.

🙂