XL 2016 Remplir un tableau

Seddiki_adz · 12 Juin 2023

bonjour a tous
si possible de remplir un tableau feuil2 a partir de trois colonne du feuil1 comme indiquer dans document joint
je veut mélanger les valeurs des trois colonnes Liste1 , Liste2, Liste3 en colonne A a 60 lignes puis en colonne B suivant colonne C
Merci

sylvanu · 13 Juin 2023

Re,
C'est toujours pareil avec vous. Vous demandez quelque chose, puis autre chose, et encore autre chose.
Pourquoi ne pas tout demandé la première fois, cela éviterait de reprendre le travail plusieurs fois.
En plus c'est pas très clair. Donnez un petit fichier test représentatif avec une demande claire.
Si la demande est de ré agencer le tableau de sortie avec seulement 55 lignes alors testez cette PJ, mais c'est vraiment au hasard, car je n'ai pas compris s'il fallait s'arrêter à la ligne 55 de la feuille XL ou si il fallait 55 éléments par colonne.
Comme on commence en ligne 5, c'est soit on s'arrête en ligne 55 ou ce sera 61 si on met 55 éléments par colonne.

sylvanu · 13 Juin 2023

Bonsoir Seddiki_adz,
Un essai en PJ avec :

VB:

Sub Worksheet_Activate()
Application.ScreenUpdating = False
Dim DL%, L%, i%, tablo, T
[B5:B10000].ClearContents
With Sheets("Feuil1")
    DL = .[A65500].End(xlUp).Row: tablo = .Range("A2:C" & DL)
End With
ReDim T(1 To 3 * DL)
L = 1
For i = 1 To DL - 1
    T(L + 0) = tablo(i, 1): T(L + 1) = tablo(i, 2): T(L + 2) = tablo(i, 3)
    L = L + 3
Next i
[B5].Resize(UBound(T, 1)).Value = Application.Transpose(T)
End Sub

La macro est automatique lorsqu'on sélectionne la feuille Feuil2.

Seddiki_adz · 13 Juin 2023

Merci

Seddiki_adz · 13 Juin 2023

Seddiki_adz à dit:
Merci

Bonjour
si j’arrête au ligne 55 puis je veut remplir la colonne suivante comment modifier ce code?

sylvanu · 13 Juin 2023

Re,
C'est toujours pareil avec vous. Vous demandez quelque chose, puis autre chose, et encore autre chose.
Pourquoi ne pas tout demandé la première fois, cela éviterait de reprendre le travail plusieurs fois.
En plus c'est pas très clair. Donnez un petit fichier test représentatif avec une demande claire.
Si la demande est de ré agencer le tableau de sortie avec seulement 55 lignes alors testez cette PJ, mais c'est vraiment au hasard, car je n'ai pas compris s'il fallait s'arrêter à la ligne 55 de la feuille XL ou si il fallait 55 éléments par colonne.
Comme on commence en ligne 5, c'est soit on s'arrête en ligne 55 ou ce sera 61 si on met 55 éléments par colonne.

Seddiki_adz · 13 Juin 2023

bonjour
De 56

sylvanu à dit:
Re,
C'est toujours pareil avec vous. Vous demandez quelque chose, puis autre chose, et encore autre chose.
Pourquoi ne pas tout demandé la première fois, cela éviterait de reprendre le travail plusieurs fois.
En plus c'est pas très clair. Donnez un petit fichier test représentatif avec une demande claire.
Si la demande est de ré agencer le tableau de sortie avec seulement 55 lignes alors testez cette PJ, mais c'est vraiment au hasard, car je n'ai pas compris s'il fallait s'arrêter à la ligne 55 de la feuille XL ou si il fallait 55 éléments par colonne.
Comme on commence en ligne 5, c'est soit on s'arrête en ligne 55 ou ce sera 61 si on met 55 éléments par colonne.

Bonjour
suivant de 56 a 73 et ainsi de suite

sylvanu · 13 Juin 2023

Même avec beaucoup de patience, on a du mal à suivre.

Seddiki_adz à dit:
suivant de 56 a 73 et ainsi de suite

Ca ne veut rien dire.

sylvanu à dit:
C'est toujours pareil avec vous. Vous demandez quelque chose, puis autre chose, et encore autre chose.
Pourquoi ne pas tout demandé la première fois, cela éviterait de reprendre le travail plusieurs fois.

Je jette l'éponge.

Seddiki_adz · 13 Juin 2023

sylvanu à dit:
Même avec beaucoup de patience, on a du mal à suivre.

Ca ne veut rien dire.

Je jette l'éponge.

si pas possible ?

sylvanu · 13 Juin 2023

Vous ne faites jamais l'effort d'expliquer ce que vous voulez, c'est à nous de deviner.

You never make the effort to explain what you want, it's up to us to guess.

Sie machen sich nie die Mühe zu erklären, was Sie wollen, es liegt an uns, es zu erraten.

etc...etc
Donc je ne réponds pas.

Si c'est un problème de langage, utilisez ceci : https://translate.google.fr/?hl=fr

Seddiki_adz · 13 Juin 2023

sylvanu à dit:
etc...etc
Donc je ne réponds pas.

je veut remplir les colonnes B,C et D de méme facent que la colonne B

sylvanu · 13 Juin 2023

C'est ce qui est fait.

Sans attendu dans le fichier qui montre ce que vous voulez, je ne répondrais plus.
Peut être que d'autres auront la patience.

Seddiki_adz · 13 Juin 2023

sylvanu à dit:
C'est ce qui est fait.
Regarde la pièce jointe 1172306
Sans attendu dans le fichier qui montre ce que vous voulez, je ne répondrais plus.
Peut être que d'autres auront la patience.

Oui ci ça que je veut

sylvanu · 13 Juin 2023

C'est ce que fait la PJ #5.
Ouvrez le fichier et sélectionnez la feuille 1 puis sélectionnez la feuille 2. C'est expliqué dans le post.

Seddiki_adz · 13 Juin 2023

Seddiki_adz à dit:
Oui ci ça que je veut

Merci

Amilo · 13 Juin 2023

Bonjour le forum, sylvanu, Seddiki_adz,
Une proposition avec power query sans conviction
Cordialement

XL 2016 Remplir un tableau

Seddiki_adz

XLDnaute Impliqué

Pièces jointes

sylvanu

sylvanu

XLDnaute Barbatruc

Pièces jointes

Seddiki_adz

XLDnaute Impliqué

Seddiki_adz

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

Pièces jointes

Seddiki_adz

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

Seddiki_adz

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

Seddiki_adz

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

Seddiki_adz

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

Seddiki_adz

XLDnaute Impliqué

Amilo

XLDnaute Accro

Pièces jointes

Discussions similaires