Un mot en gras sous excel

Résolu
Bonjour,

Je cherche à mettre en gras le mot X qui apparait dans chaque cellule de mon fichier Excel. J'utilise la fonction rechercher/remplacer en sélectionnant le format "gras" pour le mot de remplacement, mais toute la cellule se met alors en gras, et non le mot concerné seulement. D'après mes recherches sur le net, il faudrait désactiver l'option "mettre à jour automatiquement" dans le style utilisé, mais je ne trouve pas cette option (j'utilise Excel 2007). Merci d'avance pour votre aide

3 réponses

  1. Contributeur
    Je pense que ce n'est pas réalisable (sauf peut-être par macro).
    1
    1. bonjour
      sans macro, je ne sais pas
      avec macro

      Option Explicit
      
      Public Sub gras()
      Dim mot As String
      Dim debmot As Long
      Dim c
      mot = InputBox("mot à mettre en gras")
      For Each c In Selection
        debmot = InStr(1, c.Value, mot)
        If debmot > 0 Then
           c.Characters(debmot, Len(mot)).Font.FontStyle = "Gras"
        End If
      Next c
      End Sub

      1. Alt-F11 pour accéder à l'éditeur et copier ce code
      2. outils/macro/ choisir la macro/option et attribuer une touche de raccourci (ctrl-g par exemple)
      3. sur la feuille/sélectionner la zone à traiter puis ctr+g

      bonne suite
      0