bonjour j'ai une erreur a ceci
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
 
Dim fl As Worksheet
Private Sub EffacerLigne_Click()     
    NoLigne = ScrollBar1.Value
 
    If MsgBox("La ligne " & NoLigne & " va être effacée, " & vbCrLf & _
        "les données seront définitivement perdues" & vbCrLf & "Êtes-vous sûr de vouloir faire ça ?", _
        vbYesNo, "EFFACEMENT DE LA LIGNE") = vbYes Then
        fl.Rows(NoLigne).ClearContents''''''''''''''''''''''''''''''''''''''''''''''erreur
 
    End If
 
 Range("c" & ligne).Value = 0
 Unload Me
 
End Sub
le message est le suivant variable objet ou variable de bloc with nopn definie
es que vous pouvez m'aider
j'ais bien NoLigne Renseigné
qu'es ceque j'ai pas déclare svp ? merci