Macro ou formule sur excel 2003

Résolu/Fermé
Signaler
-
Messages postés
12257
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
3 septembre 2021
-
Bonjour,

On m'a demandé de faire une macro mais je n'y arrive pas, j'aurais besoin d'aide.
Je m'explique :

Dans la colonne M s'il y a un X mettre la ligne en rouge et gras.

Merci

3 réponses

Messages postés
14934
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 590
bonjour

Une macro pour si peu ?

Utilises la mise en forme conditionnelle :
- sélectionnes ta plage
- menu format /mise en forme conditionnelle
- choix formule : =$M1="X"
- choix du format
- valider

tu remplaces le 1 par la première ligne sélectionnée.
0
Messages postés
12257
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
3 septembre 2021
2 677
Salut gbinforme,
Je profite de l'occasion pour te souhaiter mes meilleurs voeux à toi et tes proches.


.....pfff, 8 minutes de retard... Vais de ce pas reprendre un café!!!

Bonne journée
0
Messages postés
14934
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 590
Bonjour pijaku,

Merci du coucou et tous mes voeux 2012 pour toi et ta famille.

PS : c'est sans doute normal qu'une réponse en 3 points détaillés soit plus longue à écrire ;-)
0
Messages postés
12257
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
3 septembre 2021
2 677
Salut,
Merci de tes voeux et... pour tes encouragements! Non non pas d'excuse. ;-)).

Bonne journée
0
Messages postés
12257
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
3 septembre 2021
2 677
Bonjour,

2 choix pour Excel 2003 :

Par une Mise en Forme Conditionnelle :
1- sélectionner toutes les colonnes concernées, exemple de A à Z, en cliquant sur les entêtes de colonnes et sur Ctrl pour les sélectionner simultanément.
2- Format/Mise en forme conditionnelle
3- Dans la condition 1, choisir : "La formule est :"
4- Saisir dans la barre de formule de la condition 1 : =$M1="X" (rigoureusement identique, avec tous les = "" $)
5- choisir le format en cliquant sur le bouton format :
====> Onglet Police : choisir Gras
====> Onglet Motifs, choisir Rouge
6- Valider et tester... en saisissant des x en colonne M...

Par macro :
1- Clic droit sur l'onglet de la feuille concernée, visualiser le code,
2- copier/coller ce code dans le module de feuille qui vient de s'ouvrir :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 13 Then Exit Sub
If UCase(Target.Value) = "X" Then
    Rows(Target.Row).EntireRow.Interior.ColorIndex = 3#
    Rows(Target.Row).EntireRow.Font.Bold = True
Else
    Rows(Target.Row).EntireRow.Interior.ColorIndex = xlNone
    Rows(Target.Row).EntireRow.Font.Bold = False
End If
End Sub

3- Fermer la fenêtyre Visual Basic Editeur, puis, ... Tester en saisissant des x en colonne M...
0
Merci pour vos réponses, je sais que c'est peut être peu pour vous mais quand on est novice c'est pas très clair.
Merci encore
0
Messages postés
12257
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
3 septembre 2021
2 677
De rien!
Pas de souci.
A+
0