Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Mettre lignes en couleur des cellules sélectionnés si la cellule A de la ligne <> ""

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion blord
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

blord

XLDnaute Impliqué
Bonjour à tous,

Dans une feuille, l'utilsateur peut sélectionner une ou plusieurs cellules. J'aimerais que suite à la sélection des cellules, si la cellule A de chaque ligne est différente de "vide", la ligne se met en couleur.

J'ai essayé avec le code suivant :

Code: 
    With Selection
    If Selection.Range("A" & ActiveCell.Row).Value <> "" Then Selection.EntireRow.Interior.ColorIndex = 44
    End With

Mais aucune ligne ne se colore, ni même celle dont la cellule A contient une valeur !

Est-ce possible ?

Merci pour votre aide....

Blord
 
Trier par date Trier par votes
Re : Mettre lignes en couleur des cellules sélectionnés si la cellule A de la ligne <

Bonjour carcharodon-carcharias, le forum,

Désolé, ça ne fonctionne pas correctement... Si l'utilisateur sélectionne une autre cellule que la cellule A, la ligne ne se met pas en couleur, si l'utilisateur sélectionne plusieurs lignes, le code bug...

De plus, je ne voudrais pas que la sélection se fasse automatiquement sur un changement mais que la sélection se fasse suite au déclenchement de la macro(bouton). Les utilisateur peuvent vouloir faire autre chose sur la feuille....

Donc, l'utilisateur sélectione une ou plusieurs cellules ou lignes, si la cellule A contient un valeur, on met la ligne en couleur...

Merci pour ton aide !

Blord
 
Vote positif 0 Vote négatif
Re : Mettre lignes en couleur des cellules sélectionnés si la cellule A de la ligne <

Salut

Et ainsi ,
Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Cells(Target.Row, 1) <> "" Then Rows(Target.Row).Interior.ColorIndex = 44
End Sub
 
Vote positif 0 Vote négatif
Re : Mettre lignes en couleur des cellules sélectionnés si la cellule A de la ligne <

Bonjour à vous, le Forum,

Merci pour vos suggestions cependant, j'ai modifié complètement ce que je voulais faire, mon idée originale apportant d'autres contraintes imprévues....

Encore une fois, merci pour votre aide...

Blord
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

C
  • Question Question
XL 2021 Mettre en couleur cellule avec une mêmes informations
Réponses
3
Affichages
141
Ckyara31
C
  • Question Question
XL 2010 changement de la couleur d'un onglet (jaune), si une des cellules d'un tableau n'est plus vide sinon l'onglet garde sa couleur d'origine
2
Réponses
23
Affichages
719
sebbbbb
B
  • Question Question
XL 2016 Somme automatique des prix associés aux produits sélectionnés sur Excel
Réponses
6
Affichages
238
bkarima1
B
B
  • Résolu(e)
XL 2021 compter les cellules de la même couleur
2 3
Réponses
36
Affichages
1 K
mapomme
R
  • Question Question
XL pour MAC Action d'une formule conditionnelle dans une cellule en fonction de la couleur de cette cellule
2
Réponses
17
Affichages
482
rtlv17
R
A
  • Résolu(e)
XL 2016 Colorer cellules suivant condition saisie texte en VBA
Réponses
5
Affichages
308
Al1_44
A
T
  • Question Question
XL 2019 dans un tableau ( mise en forme de tableau), 2 couleur pour 1 tableau
Réponses
4
Affichages
305
tuti
T
  • Question Question
Microsoft 365 Compter le nombre de cellule mise en couleur avec MFC
2
Réponses
19
Affichages
1 K
job75
E
  • Question Question
Microsoft 365 Mise en forme conditionnelle d'une ligne avec critère.
Réponses
9
Affichages
502
TooFatBoy
C
  • Résolu(e)
XL 2016 Propriété pour déterminer si la sélection correspond à une plage de cellules
Réponses
2
Affichages
166
crocrocro
C
A
  • Résolu(e)
XL 2016 Recherche d'un mot dans une cellule et surlignage de la ligne
Réponses
4
Affichages
388
Abi23
A
D
  • Résolu(e)
Microsoft 365 VBA Déplacement de la cellule active dans une ligne sélectionnée
Réponses
11
Affichages
255
danielco
D
D
  • Question Question
Microsoft 365 mise en forme conditionnelle : choisir la couleur d'une autre cellule
Réponses
11
Affichages
694
deuxnid
D
M
  • Question Question
Autres Mettre en couleur des cellules depuis une date de début jusqu'a la date de fin
Réponses
10
Affichages
432
mcl
M
C
Excel : Fusionner des cellules en conservant le contenu et la police des cellules à fusionner
Réponses
5
Affichages
523
crocrocro
C
T
  • Question Question
XL 2021 Additionner la couleur du fond et la police de plusieurs cellule en vba
Réponses
7
Affichages
478
Tophe2
T
S
  • Résolu(e)
Microsoft 365 Mailing mise en forme HTML : revenir à la ligne automatique si trop de texte saisie
2
Réponses
17
Affichages
754
spike29
S
C
  • Question Question
Microsoft 365 je cherche un code excel pour copier la couleur d'une cellule, à toutes les cellules qui ont la même valeur dans mon tableau.
Réponses
1
Affichages
336
sylvanu
  • Résolu(e)
XL 2016 En VBA, Automatiser la réponse en fonction de l'état d'une cellule.
Réponses
7
Affichages
524
piga25
  • Résolu(e)
XL 2016 Mettre la même couleur de la dernière cellule colorée
Réponses
5
Affichages
438
TooFatBoy
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…