Discussion :

[amirale]

Bonjour,

Tout d'abord, merci d'avance de l'intérêt que vous porterez à ma demande.

Je dois faire un userform qui comportera des check box afin de filtrer des données contenues dans un classeur comportant plusieurs feuilles et ainsi générer un nouveau fichier avec les donnés qui m'intéressent.

J'ai un code erreur Objet requis (erreur 424) sur le code suivant au niveau du while:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Private Sub CommandButton1_Click()
If UserForm1.CheckBox1.Value = True Then
        iCol = 1
        iRow = 1
        MsgBox iCol
        While feuilSynthese.Cells(iRow, iCol) <> ""
            feuilARemplir.Cells(iRow, iCol) = feuilSynthese.Cells(iRow, iCol).Value
            iRow = iRow + 1
        Wend
End If
End Sub

Savez vous comment corriger ce problème?

Merci pour vos remarques et solutions

Cordialement
Sylvain

[amirale]

Bon, j'ai initialisé mes variables dans CommandButton1 et non pas dans un module et plus de problèmes.
bye