Mettre en gras premier mot d'une cellule

Bonjour à toutes et à tous.

J'ai besoin pour mon travail de mettre en gras et avec une police de 16 le premier mot d'une cellule qui comporte entre 2 et 8 mots.

J'aimerais trouver une solution moins fastidieuse que de faire la mise en forme sur chacune des cellules de mes 2200 lignes!!!

J'ai essayé une macro mais ça me reproduit exactement le texte de la cellule avec laquelle j'ai enregistré la macro...et pas juste la mise en forme comme je voudrais.

Je sèche un peu, si quelqu'un à une soluce ce serait sympa.

Merci

Bonjour,

quelle est la référence de la colonne ou plus précisément tu pars de quelle cellule ? A1 ou B1 ... ?

A te relire

Bonjour

Peux-tu envoyer un fichier avec

  • une feuille du nom de ta feuille contenant les données
  • quelques lignes de ton tableau

Cordialement

Salut.

Alors pour vous répondre je joins un fichier avec quelques lignes de mes données...

En A1 vous verrez le résultat que je voudrais obtenir.

Merci

179test-boulot.xls (18.00 Ko)

re,

Vois le fichier joint dans lequel j'ai placé un code dans un module en VBA qui actionné par le bouton sur ta feuille te fera ce que tu demandais.

Si ok, n'oublie pas de cloturer le fil en cliquant cocher le V vert à coté du bouton Editer

Amicalement

471test-boulot.zip (9.95 Ko)

Super c'est bien ce que je voulais pour mettre en gras et peux tu me dire ce qu'il faut rajouter pour mettre la police en 16 par exemple.

MErci

Re,

Oups déso, tu l'avais demandé pourtant. Remplace le code par celui-ci :

Sub test()
'Macro dan pour slinky
Dim cel As Range
For Each cel In Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
    With cel.Characters(1, InStr(1, cel, " ") - 1).Font
        .Bold = True
        .Size = 16
    End With
Next
End Sub

N'oublie pas de cloturer le fil...

Amicalement

GENIAL.

C'est tout à fait ce que je voulais.

Un grand merci pour cette aide précieuse.

Rechercher des sujets similaires à "mettre gras premier mot"