Concaténer plusieurs colonnes

[isa44]

Re bonsoir,
me voici avec un nouveau problème :

Sur un tableau j'ai 4 colonnes à concaténer et je voudrais le faire avec une macro.
Voici le fichier joint

 

[suistrop]

Re : Concaténer plusieurs colonnes

flute !

 

[CB60]

Re : Concaténer plusieurs colonnes

Bonsoir
regarde si cela te convient?

Sub concat()
 
    Range("G5").FormulaR1C1 = "=TEXT(RC[-4],""hh:mm"")&"" et ""&TEXT(RC[-2],""hh:mm"")"
    Range([G5], [a65536].End(xlUp).Offset(0, 6)).FillDown
    Range("h5").FormulaR1C1 = "=TEXT(RC[-4],""hh:mm"")&"" et ""&TEXT(RC[-2],""hh:mm"")"
    Range([h5], [a65536].End(xlUp).Offset(0, 6)).FillDown
 
End Sub

 

[isa44]

Re : Concaténer plusieurs colonnes

Merci de te pencher sur mon problème.
Ce n'est pas exactement ça.

En fait il faut regrouper les heures de début dans une même cellule en colonne B et les heures de fin dans une même cellule en colonne c

 

[CB60]

Re : Concaténer plusieurs colonnes

Bonjour
Regarde si de cette façon ça te convient?

 

[isa44]

Re : Concaténer plusieurs colonnes

Bonjour et merci.

J'avais omis de mettre d'autre colonnes à concaténer pour alléger le fichier pensant pouvoir adapter le code. Mais là encore je suis limitée.

Et pour la mise en forme je voudrais que les horaires soient l'un en dessous de l'autre.

Je joint un autre exemple

Je suis exigeante ....

 

[abcd]

Re : Concaténer plusieurs colonnes

Bonjour,

Et dire que c'est tellement facile par formule !

abcd

 

[JCGL]

Re : Concaténer plusieurs colonnes

Bonjour à tous,

Avec les formules d'ABCD et un code pour la recopie (c'est tellement plus facile par Macro !)

A+

 

[teodormircea]

Re : Concaténer plusieurs colonnes

Plus facile a utiliser de Formules

=(cell)&"_"&(cell)

 

[JCGL]

Re : Concaténer plusieurs colonnes

Bonjour à tous,

Bravo pour ton intervention mais pourrais-tu développer ?
Un Forum se doit formateur...

Plus facile a utiliser de Formules

=(cell)&"_"&(cell)

Tout le monde n'a pas la science infuse.

A+

 

[isa44]

Re : Concaténer plusieurs colonnes

Merci à tous vous avez solutionné mon problème ( en particulier grace à JCGL) , je savais que je trouverais des âmes charitables sur ce forum.

En effet ce site est formateur.

 

[JCGL]

Re : Concaténer plusieurs colonnes

Re,

Je tiens à repréciser que les formules sont d'ABCD
Et qu'un Forum se doit d'être formateur et donc Merci de documenter vos propos.

Bises, en passant, à Isa 😛
A+ à tous

 

[abcd]

Re : Concaténer plusieurs colonnes

Bonjour JCGL,

Je n'ai pas d'explication quant à la proposition de formule de teodormircea.
Je l'ai testée et elle ne renvoie pas le résultat escompté.
Je suis tout aussi curieux que toi, attendons sa réponse.

Mais il y a autre chose qui me préoccupe.
Je constate qu'en J5 il y a un alignement en bas et je ne parviens pas (encore) à le corriger.
Si c'est vraiment gênant, je continue à chercher.

Pour finir, et afin que ta macro soit parfaite, on pourrait y ajouter un copier / coller valeurs pour ne pas afficher les formules.

abcd

 

[JCGL]

Re : Concaténer plusieurs colonnes

Re
Salut ABCD 🙂,


Puisque Isa est contente... Pourquoi veux-tu être aussi perfectionniste ?
Le décalage peut servir de repère visuel.

Pourquoi "cacher" ta formule... "Elle est belle ta formule, elle est belle" (mettre le ton qui va bien comme sur les marchés de la Canebière arf arf ).

Autrement un PasteSpecial Paste:=xlPasteValues, ferait l'affaire.

Mais je t'avoue que j'aime assez le mélange "des genres"

A++ ABCD
A+ à tous

 

[Tibo]

Re : Concaténer plusieurs colonnes

Bonjour à tous,

Une solution pour modifier l'alignement vers le bas :

changer l'emplacement du CAR(10) :

en J5 :

=SI(D5="";"";TEXTE(D5;"h:mm")&CAR(10))&SI(F5="";"";TEXTE(F5;"h:mm")&
CAR(10))&SI(H5="";"";TEXTE(H5;"h:mm"))

@+