Concaténer 2 cellules avec format différent

[john]

Bonjour à tous,

J'aimerai savoir si c'est possible de fusionner 2 (ou plus) cellules avec des formats différents et après la fusion retrouver ces formats dans la cellule de fusion.

Exemple : dans "A1" j'ai FCK en gras et en "B1" 257 en normal, j'aimerai qu'en "C1" FCK soit en gras et 257 en normal.

Est-il possible de le faire sans macro ? si pas possible le faire via une fonction.

Je vous remercie d'avance.

John

 

[klin89]

Re : Concaténer 2 cellules avec format différent

Bonjour john,

Avec 2 cellules :

Sub MotEnGras()
Dim LeMot As String
[C1].Clear: [C1] = [A1] & [B1]: LeMot = [A1].Text
[C1].Characters(1, Len(LeMot)).Font.FontStyle = "Gras"
End Sub

Sinon, vois le travail de Efgé ci-dessous :
https://www.excel-downloads.com/threads/couleur-de-texte.150692/

Klin89

 

[john]

Re : Concaténer 2 cellules avec format différent

Merci, pour le gras ça marche sans souci...
Est-possible de faire pareil que le gras avec des exposants ou des indices ?
Je me doute que c'est possible, mais comment faire pour détecter ce qui est en exposant ou en indice dans la ou les cellules à fusionner ?
Et comment puis-je faire une fonction car j'ai essayé, mais me renvoi 0 car me dit "référence circulaire"

Merci d'avance.

John

 

[john]

Re : Concaténer 2 cellules avec format différent

Bonjour à tous,
Personne pour mon problème ?
Pour la fonction, ça va j'ai vu mon soucis mais j'ai toujours le problème pour concaténer 2 cellules où il y a des exposants et des indices afin de garder ceux-ci après la concaténation.
Je vous remercie d'avance.
John