XL 2010 Surligner des lignes et des colonnes

Yurperqod

XLDnaute Occasionnel

• 5 Septembre 2017

• #2

Bonjour à tous

A mettre dans le code de la feuille concernée

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Calculate
If Target.Column > 1 And Target.Row > 2 Then
Cells.Interior.Color = RGB(255, 255, 255)
Union(Range(Cells(Target.Row, 2), Cells(Target.Row, 36)), Columns(Target.Column)).Interior.Color = RGB(111, 180, 241)
End If
End Sub

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Septembre 2017

• #3

merci beaucoup, c'est tout a fait ça,

j'ai remplacer
Union(Range(Cells(Target.Row, 2)

par
Union(Range(Cells(Target.Row, 1)

pour que ça commence bien de la colonne A

Par contre il y a un beug on dirait, dès que je clique sur les cellules C3 ou D5 par exemple, la partie horizontale n'est pas colorée. Vous avez une idée?

 

Vote positif 0 Vote négatif

Yurperqod

XLDnaute Occasionnel

• 5 Septembre 2017

• #4

RONIBO à dit:

Par contre il y a un beug on dirait, dès que je clique sur les cellules C3 ou D5 par exemple, la partie horizontale n'est pas colorée. Vous avez une idée?

Cliquez pour agrandir...

Je ne constate pas ca sur mon PC

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 6 Septembre 2017

• #5

J'ai trouvé le problème, le problème vient de la MFC, vu qu'il y a une MFC, toute les cellules colorées en orange passe pas. voir PJ
Vous avez une solution pour se problème ?

A+

 

Pièces jointes

• 111.png

  219.9 KB · Affichages: 58
• test.xlsm

  153.2 KB · Affichages: 41

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 6 Septembre 2017

• #6

Bonsour®

RONIBO à dit:

Lorsqu'on clique sur un chiffre, j'aimerai surligner (Mettre de la couleur sur toute la colonne et toute la ligne des cellules concernées)

Lorsqu'on clique sur une autre donnée, mettre en blanc la ligne et colonne surligner précédemment et surligner les nouvelles cellules.

Cliquez pour agrandir...

voir explications là :
http://www.polykromy.com/nl/nl6/nl6.html
voir aussi exemple là ;

Spoiler: jb_CURSEUR

https://www.google.com/url?q=http:/...ds-cse&usg=AFQjCNHhjlIHN-pQE3KDNukqh8dhb6v0wQ

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 6 Septembre 2017

• #7

Bonjour,

Un essai en transformant le distancier en tableau Excel (Insertion / Tableau). Ce qui permet :

• de se passer de MFC (pour colorer une ligne sur deux)
• de supprimer les formules de la colonne AF
• d'insérer ou supprimer des lignes ou colonnes avec une macro qui s'adapte automatiquement

 

Pièces jointes

• RONIBO- colorer lig et col - v1.xlsm

  69.8 KB · Affichages: 68

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 9 Septembre 2017

• #8

Merci à vous pour votre aide,

Ma pomme je n'arrive pas a faire le tableau, puis appliquer le code dans les autre onglets,

Tu as une idée, il y a un problème sur mon fichier ?

 

Pièces jointes

• final.xlsm

  209.2 KB · Affichages: 52

Dernière édition: 9 Septembre 2017

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 10 Septembre 2017

• #9

Bonsoir RONIBO,

Je ne vous oublie pas, je cherche... Il y a un truc bizarre dans votre fichier.

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 15 Septembre 2017

• #10

Bonsoir,

Après test et recherche je n'arrive toujours pas à adapter le code dans mon fichier, vous pouvez jetter un œil ?

 

Pièces jointes

• Copie de le distancier maj 31.12.2013.xlsm

  206 KB · Affichages: 42

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 23 Septembre 2017

• #11

Je me permets de remonter mon post car je n'ai toujours pas de solution.

 

Vote positif 0 Vote négatif