Un mot en gras sous excel

Résolu
luckyandunhappy -  
 luckyandunhappy -
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. Raymond PENTIER Messages postés 58218 Date d'inscription   Statut Contributeur Dernière intervention   17 484
     
    Je pense que ce n'est pas réalisable (sauf peut-être par macro).
    1
  2. ccm81 Messages postés 11033 Statut Membre 2 434
     
    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