Erreur 1004' dans visual basic

Bonjour à tous,

j'essaie de créer une reherche dans mon database

afin de pouvoir par la suite les modifier ou les suprimer ou juste le consulter.

J'ai créer mon macros copier_coller

ensuite le formlaire tout est ok

seulement quand je vais dans visual basic et que je copie le modèle cela ne fonctionne pas.

Range("Tableau25").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("Input").Range("Z2:Z3"), CopyToRange:=Sheets("Input").Range("AB2:AQ2"), Unique:=False

Pourriez vous m'aider svp. j'ai des connaissance assez limité en informatique.

merci d'avance.

Bonjour,

Le CopyToRange doit être sur la même feuille que Tableau25 (ton code ne précise pas sur quelle feuille il se trouve)

Edit : un code générique facile à adapter pour copier vers une autre feuille :

Private Sub FiltreElabore()
Dim rngDonnees As Range
Dim rngCritere As Range
Dim celResultat As Range
  With Worksheets("Résultat")
    .Cells.Clear
    Set celResultat = .Range("a1")
    .Activate
  End With
  Set rngDonnees = Worksheets("Données").Range("a1").CurrentRegion
  Set rngCritere = Worksheets("Critères").Range("a1").CurrentRegion
  rngDonnees.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=rngCritere, Unique:=False
  rngDonnees.Copy Destination:=celResultat
  If Worksheets("Données").FilterMode Then Worksheets("Données").ShowAllData
End Sub

Merci Patrice pour votre rapidité.

Je sui désolée je débute je n'y comprends rien dans tous ces code. J'essaye de suivre des tutos sur youtube.

Est ce qu'il serait possible de vous envoyé mon fichier excel pour que vous jetiez un coup d'oeil s.v.p?

Je vous remercie quand même dans tous les cas.

Re,

Un bon cours VBA gratuit ici :

https://www.excel-pratique.com/fr/vba.php

Merci beaucoup j'ai enfin réussi le numéro du tableau était faut.

Vous m'avez beaucoup aidé.

Rechercher des sujets similaires à "erreur 1004 visual basic"