VB Format conditionnel

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. SVP, j'ai vraiment besoin d'une réponse pour en mettre plein la vue à mon Boss ;o)
    1. 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