Surligner lignes et colonnes

Bonjour,

J'ai une question et une demande assez original, j'aimerais que lorsque je clique sur une cellule, sa colonne et sa ligne se surligne temporairement.

Pour cela, j'ai un peu jouer avec le personal XLSB mais sans trop comprendre et j'y ai fait une macro qui n'avait pas fonctionné. En la supprimant il s'avère qu'elle s'est mise à marcher mais seulement quand j'utilise la fonction rechercher.

Je demande votre aide pour m'aider à la faire s'éteindre malgré qu'elle soit supprimé, et à en refaire une autre qui fonctionne tout le temps.

D'avance merci pour les braves qui essayerons de m'aider !

Bonjour,

Vous pouvez procéder comme ceci par exemple :

' code à insérer dans le module worksheet de la feuille correspondante
Option Explicit

Private lastRows As Range
Private lastCols As Range

Private Const HIGHLIGHT_COLOR As Long = 15917529

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ' clean previous highlight
    ClearHighlight
    ' save news highlights
    Set lastRows = Target.EntireRow
    Set lastCols = Target.EntireColumn

    lastRows.Interior.Color = HIGHLIGHT_COLOR
    lastCols.Interior.Color = HIGHLIGHT_COLOR
End Sub

Private Sub ClearHighlight()
    If Not lastRows Is Nothing Then lastRows.Interior.Pattern = xlNone
    If Not lastCols Is Nothing Then lastCols.Interior.Pattern = xlNone
End Sub
0book1-copie.xlsm (14.63 Ko)

NB : une limitation est que cette macro écrasera et effacera vos eventuels coloriages de cellules déjà présents sur la feuille.

Bonjour
Eventuellement avec l'option "Focus sur la cellule" dans le menu "Affichage" (possible à la sélection ou lors des recherches) ?

image

Stéphane

WOW je ne connaissais pas cette fonctionnalité, c'est exactement ce que je cherchais.

Merci beaucoup, c'était plus facile que prévu.

Rechercher des sujets similaires à "surligner lignes colonnes"