VBA : Texte en gras en fonction d'une chaine de caractère

Fermé

Nathan.Pllt Messages postés 1 Date d'inscription mercredi 14 décembre 2016 Statut Membre Dernière intervention 14 décembre 2016 - 14 déc. 2016 à 15:20
ccm81 Messages postés 10851 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 16 avril 2024 - 14 déc. 2016 à 15:53

Bonjour,

J'ai un petit souci. J'ai un tableau Excel dans lequel j'aimerais qu'une macro repère les cellules qui comportent une de ces chaines de caractères : "code mrp03", "code mrp06" ou "code mrp07".

J'ai déjà créé ce code mais il ne marche pas. Quelqu'un peut m'expliquer ?

"Sub Date_Besoin()

'Faire copier coller
Sheets("Feuil2").Activate
Range("Q4:AF62").Select

If ActiveCell.Text Like "code mrp03" Then
Cell.Font.Bold = True

ElseIf ActiveCell.Text Like "code mrp06" Then
Cell.Font.Bold = True

ElseIf ActiveCell.Text Like "code mrp07" Then
Cell.Font.Bold = True
End If

End Sub

Merci d'avance ! :)

A voir également:

Mettre en gras une chaine de caractère vba
Caractère ascii - Guide
Ecrire en gras sur whatsapp - Guide
Caractere speciaux - Guide
Caractères spéciaux : comment taper des |—[©\½→}… - Guide
Caractère spéciaux mac clavier - Guide

2 réponses

Réponse 1 / 2

Pierre1310 Messages postés 8554 Date d'inscription lundi 21 décembre 2015 Statut Membre Dernière intervention 21 juillet 2020 645
14 déc. 2016 à 15:23

Salut,

ActiveCell.Font.Bold = True

Plutôt?

De plus, je ne sais pas si tu as le droit de sélectionner toute la plage et de lui dire de tout faire comme ça, je pense qu'il va te falloir une boucle (longtemps que je n'ai pas fais de vba).

Réponse 2 / 2

ccm81 Messages postés 10851 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 16 avril 2024 2 404
14 déc. 2016 à 15:53

Bonjour

Tu peux éviter une macro avec une Mise en forme conditionnelle (MFC) avec comme formule appliquée à ta plage (Q4:AF62)
=(OU(NB.SI(Q4;"*code mrp03*");NB.SI(Q4;"*code mrp07*");NB.SI(Q4;"*code mrp06*")))

Cdlmnt

Discussions similaires

Caractère invisible ou vide pour pseudo invisible

Dessiner avec son clavier et avec des lettres

Comment insérer correctement des caractères spéciaux ou émojis ?

Discussions similaires

Newsletters