Mettre en gras une partie de texte [Résolu]

[NEC14]

Bonjour à tous,

Dans un formulaire en Vba, je saisie différentes données. Lorsque je clique sur un bouton "OK" alors les données sont rapatriées dans un tableau ainsi que sur une fiche récapitulative.

Dans la zone détail de cette fiche sont indiqués le nom de l'intervenant (CmbInt) ainsi que le détail des travaux demandés. Les données sont rapatriés dans la cellule F14 de la feuille "Formul".

Je souhaiterai que le nom (CmbInt) soit en gras mais pas le reste.

Comment puis-je faire s'il vous plait ?

Voici la partie du code qui m'intéresse

Code :

1
2
 
[F14].Value = " " & (FrmSaisie.CmbInt.Value) & " " & "-" & " " & "Merci de " & " " & (FrmSaisie.TxtDétail.Value)

Merci par avance pour votre aide
René

[gFZT82]

Bonjour,

As-tu regardé du coté de Range.Characters ?

Cordialement.

[NEC14]

Bonjour,

Je vais regarder, mais je ne connaissais pas. Cela va être nouveau pour moi.
Merci

Eh bien j'ai regardé, mais cela m'a l'air bien compliqué. Mais bon j'essaie et si je n'y arrive pas je demanderai du secours.

Voilà j'ai fais ceci, mais c'est tout le texte qui est en gras. Alors que je ne souhaite que la première partie en gras c'est à dire CmbInt.

Code :

1
2
3
 
[F14].Value = " " & (FrmSaisie.CmbInt.Value) & " " & "-" & " " & "Merci de " & " " & (FrmSaisie.TxtDétail.Value)
Range("F14").Characters(1).Font.Bold = True

Qu'est-ce qui cloche ?

Merci pour votre aide

[gFZT82]

L'idée c'était de faire quelque chose comme ça :

Code :

1
2
3
[F14].Value = " " & (FrmSaisie.CmbInt.Value) & " " & "-" & " " & "Merci de " & " " & (FrmSaisie.TxtDétail.Value)
Longueur = Len(FrmSaisie.CmbInt.Value) 
[F14].Characters(2, Longueur).Font.Bold = True

Cordialement.

[NEC14]

Merci beaucoup. Je dois avouer que je n'aurai pas trouvé.
ça marche et c'est super.