Erreur #VALEUR! pour macro filtrage

Bonjour,

Je devais avoir une macro qui filtre plusieurs colonnes selon des critères (1 critère par colonne)

Grace à l'enregistreur de macro j'ai eu un code qui me permet d'opérer comme la fonctionnalité "filtrer" d'Excel.. celui ci correspond mais j'ai un probleme au niveau des cumuls de données de chaque colonne qui affiche par defaut "#VALEUR!"

J'ai essayé de convertir les totaux, mais l'erreur reste présente

voici le code:

Sub leseul() 'ajouter plein/vide pour les produits colonne 13

    Sheets("Extraction").Activate
    Sheets("Extraction").Cells(1, 1).AutoFilter
    ActiveSheet.Range("$A$1:$X$3000").AutoFilter Field:=1, Criteria1:="Arrivée"
    ActiveSheet.Range("$A$1:$X$3000").AutoFilter Field:=1, Criteria1:="Départ"
    Sheets("Extraction").Cells(115, 14).FormulaR1C1 = "=R[-113]C:R[-1]C"
    Range("N115").Select
    Selection.AutoFill Destination:=Range("N115:X115"), Type:=xlFillDefault

End Sub

Merci d'avance

Bonsoir,

jolie macro d'enregistreur... Mais l'enregistrement ne nous sert à rien sans avoir de support pour "le lire" ...

Regardez ma signature ainsi que le point 6 des bonnes pratiques d'utilisation du forum

@ bientôt

LouReeD