Mise en forme conditionnelle avec ?

Résolu
Dandy_danbe Messages postés 108 Date d'inscription   Statut Membre Dernière intervention   -  
Dandy_danbe Messages postés 108 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
je voudrais mettre une mise en forme pour que si je selctionne une celulle toute le ligne se mette en une couleur
par ex. ci je celectionne b5 toute la ligne 5 se mette en bleu
ceci affin d'avoir une meilleur visibilite pour remplir un tableau
merci d'avance pour vos reponce.


A voir également:

2 réponses

Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

Tu peux obtenir ce résultat avec une procédure VBA (à placer dans le module de la feuille concernée) .
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.EntireRow.Interior.ColorIndex = 24
End Sub

A+
0
Dandy_danbe Messages postés 108 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour;
un grand merci ca marche comme je le voulais.
peut on faire la meme chose pour les colonne et la ligne en meme temps?
0
Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526 > Dandy_danbe Messages postés 108 Date d'inscription   Statut Membre Dernière intervention  
 
Oui, oui .... on peut le faire ! :D
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.EntireRow.Interior.ColorIndex = 24
Target.EntireColumn.Interior.ColorIndex = 24
End Sub
0
Dandy_danbe Messages postés 108 Date d'inscription   Statut Membre Dernière intervention  
 
ok ca marche a la perfection un gran merci
0
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Bonjour,

Tu peux le faire directement avec deux règle dans ta mise en forme conditionnelle
sélectionner la plage à traiter, exemple A2:X50
Mise en forme conditionnelle, la première formule
=LIGNE()=CELLULE("ligne")
format/Remplissage, choisir la couleur
deuxième formule
=COLONNE()=CELLULE("colonne")
format/Remplissage, choisir la couleur

pour accélérer et automatiser le processus dans les propriétés de la feuille coller ce code
Clic droit sur l'onglet de ta feuille/Visualiser le code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End Sub
0
Dandy_danbe Messages postés 108 Date d'inscription   Statut Membre Dernière intervention  
 
desole mais ca marche pas aparament pb/ traduction programme en nerlandais
0