Conversion colonnes.

Résolu
chunga's rev Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   -  
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour.
On me demande de convertir une ligne de 12 colonnes en 3 lignes de 4 colonnes, en gardant, bien entendu, les données de celles-ci.
J'avoue être perdu.

Ligne A, données colonne 1 à 12
à convertir en :
Ligne A, données colonnes 1 à 4
Ligne A, données colonnes 5 à 8
Ligne A, données colonnes 9 à 12

Je ne sais même pas si celà est possible.

Merci.
A voir également:

1 réponse

Réponse 1 / 1
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

On me demande de convertir une ligne manuellement, formule ou VBA ???????????
0
chunga's rev Messages postés 7 Date d'inscription   Statut Membre Dernière intervention  
 
en VBA , en fait ce n'est pas qu'une ligne à convertir en 3, mais plutôt 100...
Merci de vous intéresser à mon cas.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

une facon de faire au plus simple: 

Sub distrib()
    Application.ScreenUpdating = False
    With Worksheets("feuil1")
        derlig = .Range("A" & Rows.Count).End(xlUp).Row
        For lig = derlig To 1 Step -1
            'colonnes I-L
            .Range("I" & lig & ":L" & lig).Cut
            If lig = derlig Then
                .Range("A" & lig + 1).Select
                ActiveSheet.Paste
            Else
                .Range("A" & lig + 1).Select
                Selection.Insert Shift:=xlDown
            End If
            .Range("E" & lig & ":H" & lig).Cut
            .Range("A" & lig + 1).Select
            Selection.Insert Shift:=xlDown
        Next lig
    End With
    Application.ScreenUpdating = True
End Sub
0
chunga's rev Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   > f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention  
 
Merci, celà semble donc possible.
Mais ceci a comme résultat:

https://www.cjoint.com/c/DLpopsyy7pH

Et comme je suis une "bille" en VBA, je n'arrive pas à corriger celà...
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

vous avez ecrit:
convertir une ligne de 12 colonnes en 3 lignes de 4 colonnes, pourquoi y a 13 ?????
0
chunga's rev Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   > f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention  
 
Parce que je me suis mal exprimé.
Il y a la première colonne de "référence" puis 12 colonne de données. Et celà fait bien 13, sorry.
En fait, le résultat souhaité serait:

https://www.cjoint.com/c/DLpo7fRct88
0

Discussions similaires

Conversion Bytes à Mo
Utilisateur anonyme -
papoute76 -

8 réponses
différence entre Mo et MB
nathalie -
Phase2 -

33 réponses
Question 1 Mb = ?Mo
allosme -
Kayzer54 -

6 réponses
conversion Mo MB
louise -
phenixphenix -

33 réponses