Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

mettre ligne et colonne de la cellule sélectionnée en gras


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    mettre ligne et colonne de la cellule sélectionnée en gras
    Bonjour,
    J'ai un tableau qui ressemble à ceci :

    Celui-ci peut évoluer quant aux nombres de lignes et de colonnes.
    Je souhaite que la ligne et la colonne de la cellule sélectionnée soit en gras même si cette dernière est vide. (ex : D5 de mon tableau exemple)
    J'ai trouvé de bout de code mais il ne se limite à mon tableau. En effet si je suis en C6, il met en couleur la ligne et la colonne alors que cette ligne ne doit pas être considérée.
    De plus, si je me mets en D7, c'est uniquement la cellule qui a de la couleur.
    J'espère que c'est clair.
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        Target = Range("a1").CurrentRegion
        ' Clear the color of all the cells
        Cells.Interior.ColorIndex = 0
        If Target.Cells.Count > 1 Then Exit Sub
        Application.ScreenUpdating = False
        With ActiveCell
            ' Highlight the row and column that contain the active cell, within the current region
            Range(Cells(.Row, .CurrentRegion.Column), Cells(.Row, .CurrentRegion.Columns.Count + .CurrentRegion.Column - 1)).Interior.ColorIndex = 8
            Range(Cells(.CurrentRegion.Row, .Column), Cells(.CurrentRegion.Rows.Count + .CurrentRegion.Row - 1, .Column)).Interior.ColorIndex = 8
        End With
        Application.ScreenUpdating = True
    End Sub


    Merci beaucoup.

  2. #2
    Membre expert
    Bonjour,

    Tu pourrais faire un petit effort, je t'ai répondu hier :
    connaitre la dernière cellule - Macros et VBA Excel
    Il suffit de remplacer la couleur de l’intérieur par le gras de la police !
    Cordialement,
    Patrice
    Personne ne peut détenir tout le savoir, c'est pour ça qu'on le partage.

    Pour dire merci, cliquer sur et quand la discussion est finie, penser à cliquer sur

  3. #3
    Membre du Club
    sorry je n'avais pas vu ta réponse
    encore endormi
    je vais regarder