Colonne --> colonnes

Bonjour
"Je ne trouve pas de réponse!"
...cela ne semble pas trop surprenant, vu votre question
vous demandez des colonnes pour ce qui est séparé par des OFF, mais votre exemple de solution ne correspond pas tout à fait à ça
si on s'en tient à la question:
2 5 8
8 4 9 7
etc>...
à vous lire?
ctrdlmnt

Hello,

Si j'ai bien compris la question voici un code en VBA à introduire dans un module :

Sub TEST()
Dim sht As Worksheet
Dim LastRow As Integer, LastColumn As Integer, LR As Integer
Dim Copyrange As Range

Set sht = ActiveSheet

LastRow = sht.Cells(sht.Rows.Count, "A").End(xlUp).Row

For i = 1 To LastRow

LastColumn = sht.Cells(1, sht.Columns.Count).End(xlToLeft).Column
LR = sht.Cells(sht.Rows.Count, LastColumn).End(xlUp).Row

If Cells(i, LastColumn).Value = "OFF" Then
Set Copyrange = Range(Cells(i + 1, LastColumn), Cells(LR, LastColumn))
Copyrange.Cut Cells(1, LastColumn + 1)
i = 0
LR = sht.Cells(sht.Rows.Count, LastColumn).End(xlUp).Row
Cells(LR, LastColumn).Clear
End If

Next i

Application.CutCopyMode = False

End Sub

Il n'est pas super propre et il y a surement beaucoup de manières différentes de le faire, mais ça marche mon côté

Bonjour,

Pour reprendre la réflexion de notre ami Vaucluse, pourquoi as tu inscrit le 7 en 1° colonne? faute de frappe?

Des centaines de valeurs? 500 valeurs ? 1000 ? 5000 ? 100000 ? suivant le nombre, le code VBA pourra utiliser des méthodes différentes ou une solution par formule....

Sur ton classeur, démarre t'on à la ligne 1 ou2 ou.....? quelle colonne: A, X, CD ?

où met on le résultat ? à la place de la colonne initiale ?

Merci d'^tre précis dans ta demande.

au besoin

Mettre le classeur sans données confidentielles en pièce jointe sur 
https://mon-partage.fr/
Puis faire un clic droit copier le raccourci  et coller dans votre message 

Pas de réponse de Guit12... on laisse tomber ?

Bonjour à tous,

Je souhaiterai obtenir X colonnes...
Avec ton exemple, sans doute trop restrictif, X=2 mais... qu'en est-t-il ?
Que se passe-t-il après le 2nd OFF ?
Comme dit michel il faut être précis quand on fait une demande.
eric

Ca fait plaisir les gens qui demandent de l'aide et ne suivent pas la discussion qui cherche à l'aider.Belle mentalité de ... (au choix)

comme j'ai bossé
https://mon-partage.fr/f/yhApu5ta/
2500LIGNES avec 31 "OFF3 traitées en 0,15 secondes

Abandon du suivi

Bonjour,

Tout d'abord : je vous remercie.
Ensuite : j'ai posé la question puis je suis parti bossé donc je crois que ça peut se comprendre que je n'étais pas devant mon ordi - d'autant que je viens de faire l'A/R (3h) pour 4h de rdv ; merci de votre compréhension)

Sur le fond avant de regarder plus en détail les propositions :
j'ai appelé colonne ce qui est indiqué comme une colonne par excel (i.e. A) soit
Colonne A
1ere valeur
2eme valeur ....
xieme valeur
OFF
xième valeur +1
...

Sans qu'il y ait le même nombre de valeurs entre les off.

L'objectif est d'avoir les valeurs jusqu'au off sur A puis les valeurs suivantes sur B etc.

Je regarde!
Guillaume

Surtout, ne pas regarder la solution proposée... Ni m^me répondre à toutes les questions:
démarre t'on à la ligne 1 ou 2 ou.....?
de toutes façons...

Merci à tous!
Très (trop?*) réactif ici!!
Guillaume

• si on répond pas dans l'heure du post aux sympathiques réponses des forumers on se fait mal voir - dommage! Tout n'est pas forcément urgentissime et puis en l'occurrence ça peut être urgent mais avoir d'autres choses en cours (comme conduire ;)). Quoiqu'il en soit je remercie une nouvelle fois et vous dis mult bravos.

Ca marche nickel! (le code de celui qui bosse Michel (parce que moi je fous rien à 21h30 après une journée de travail...)).
Au lieu des off j'avais des h j'ai donc changé off par h dans le code et nickel!
Génial.
Merci.

RESOLU

(parce que moi je fous rien à 21h30 après une journée de travail...)).

Quel Héros du XXI° siècle !

Mossieu Guit a une haute opinion de lui-m^me!