Bonjour à tous,

voilà je n'arrive pas à faire fonctionner cette macro
la seule erreur qu'il me dit c'est que j'ai une erreur 424
A quoi cette erreur correspond?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
 For Each cel In Sheets("Arbitrage_budget").Range("c38:o250")
        With cel
            If (Column.Value(f) = "rejetée") And (Column.Value(g)) = 1 Then
            Column.Value(l) = 2
            ElseIf (Column.Value(f) = "rejetée") And (Column.Value(g)) <> 1 Then
            Column.Value(l) = 3
            End If
                If Column.Value(f) <> "rejetée" Then
                Column(l) = 1
                End If
                    If Column.Value(f) = " " Then
                    Column.Value(l) = " "
                    End If
        End With
    Next cel
est ce que vous auriez une idée pour la faire marcher. j'en ai vraiment besoin

merci