syntaxe AutoFilter en vb.net

Bonsoir à tous

J'ai intégré un Spreadsheet Excel version 11 dans un formulaire en VB.net

Je n'arrive pas à trouver la syntaxe adéquate de Autofilter.

ci-joint la routine d'essai que j'ai testée. Erreur systématique lors de l'exécution

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        ASS_1.Cells(1, 1).value = "NO"
        ASS_1.Cells(2, 1).value = 2
        ASS_1.Cells(3, 1).value = 3
        ASS_1.Cells(4, 1).value = 4
        ASS_1.Cells(5, 1).value = 5
        ASS_1.Cells(1, 2).value = "Nom"
        ASS_1.Cells(2, 2).value = "N2"
        ASS_1.Cells(3, 2).value = "N3"
        ASS_1.Cells(4, 2).value = "N4"
        ASS_1.Cells(5, 2).value = "N5"
        ASS_1.ActiveSheet.Cells.AutoFilter(Field:=1, Criteria1:=3)
    End Sub

Merci de votre aide

Bonne soirée