creer X colonnes

[lostgen67]

Bonjour le Forum....

En bref: j'ai un tableau allant de la plage 1 a la plage x
je voudrais creer autant de colonne que de plage et y mettre
dedans la saison et en dessous ou dedans, l'horaire de debut et l'horaire de fin ?

Encore une histoire de boucle je paris .... :whistle:

Ps :Sur le fichier joint vous trouverez ce que je souhaiterai obtenir.

Merci d'avance

 

[lostgen67]

et oups et zut et ...

le fichier.....

 

[Creepy]

Hello,

Pas de fichier kjoint

Pour rappel : Fichier ZIP, <50Ko et Pas d'espace ni de caractères speciaux !

++

Creepy

 

[lostgen67]

on se calme......on reflechit....

 

[lostgen67]

vraiment désolé......mais je ne dirai pas ce que vous pensez...
[file name=colonnex.zip size=4986]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/colonnex.zip[/file]

 

[Hervé]

bonjour



une proposition par macro, ca doit etre possible par formule (mais je sais pas faire).

Salut
[file name=colonnex_20050705171619.zip size=8253]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/colonnex_20050705171619.zip[/file]

 

[lostgen67]

merci hervé

Je te rassures de toute facon je souhaitais le faire en VBA.

Ce qui est dommage c'est que c'est le contraire que je voulais.....

je pense qu'il y a un ou 2 trucs a changer..... mais bon

a moins que tu ai l'idée toute prête je chercherais de mon côté...

Merci beaucoup

 

[Hervé]

re



trop nul je suis. pour me faire pardonner, le contraire.

Public Sub vev()
Dim c As Range
Dim col As Integer

col = 3
For Each c In Range('g22:g' & Range('g65536').End(xlUp).Row)
    Cells(1, col) = c.Offset(0, 3)
    Cells(2, col) = c.Offset(0, 1).Text & ' / ' & c.Offset(0, 2).Text
    col = col + 1
Next c
End Sub

je te laisse je dois payer ma tournée au zop bar team

salut

Message édité par: Hervé, à: 05/07/2005 19:46

 

[lostgen67]

merci de ton aide HERVE

Je léve mon verre aussi haut que tes connaissances*....c'est a dire trés haut...


* en VBA bien sure...lol