Bonjour,

J'ai un probleme sur une MFC, voici le code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Worksheet_Change(ByVal Target As Range)
Dim a As Integer
a = 2
While Not Cells(a, 1) = ""
    If Cells(a, 12) > 0 Then
    Range(Cells(a, 1), Cells(a, 14)).Selection.Font.ColorIndex = 3
    Else
    a = a + 1
    End If
Wend
 
End Sub
J'ai un message d'erreur 438, "Proprieté ou methode non gérée par cet objet".

Merci