VB Format conditionnel

Martino_ICI Messages postés 20 Statut Membre -  
Polux31 Messages postés 7219 Statut Membre -
Bonjour,

mon problème est très simple.

Je souhaite traduire la condition suivante en VB.

Si dans la colonne L il trouve une cellule non vide, alors il met la ligne correspondante en gras et pourquoi pas en couleur.

Par avance merci.
Configuration: Windows XP
Internet Explorer 6.0

2 réponses

  1. Martino_ICI Messages postés 20 Statut Membre
     
    SVP, j'ai vraiment besoin d'une réponse pour en mettre plein la vue à mon Boss ;o)
    0
  2. Polux31 Messages postés 7219 Statut Membre 1 204
     
    bonjour,

    il faut copier ce code dans un module (éditeur VB touche F11) :
    Sub Macro1()
    '
    ' Macro1 Macro
    ' Macro enregistrée le 11/04/2008 par Polux31
    '
    ' Touche de raccourci du clavier: Ctrl+w
    '
    Dim i As Long
    
    i = 1
        
    For Each v In Columns
        If Cells(i, 12).Value <> "" Then
            Rows(i).Font.Bold = True
            Cells(i, 12).Interior.ColorIndex = 3
        End If
        i = i + 1
    Next
    End Sub

    Le lancement de la macro se fait par : Ctrl+w

    ;o)

    Polux
    0