Synthaxe pour les "Copy" et "RemoveDuplicates"

Bonjour à tous !

Ayant appris beaucoup sur la manière de coder là dernière fois que j'ai posté sur le forum j'ai décidé de virer tout les "Select" et "Active.." de mes codes.

Cependant, un soucis persiste lorsque j'essaye de faire un sheets().range().copy ou un sheets().range().removeduplicates
Je suis obligé de faire un Sheets().Select avant le .Range()

Je me suis dit que j'allais essayer avec un Worksheet comme ci-dessous:

Code:

---

1 2 3

Worksheets(ComboBox3.Value & " - " & ComboBox1.Value).Range(Cells(7, 2), Cells(1000, 2).End(xlUp)).Copy   Worksheets("Work for delta").Range(Range("A10"), Range("A10").End(xlDown)).RemoveDuplicates Columns:=1, Header:=xlNo

---

Rien y fait, j'ai beau essayer toutes les synthaxes que je connaisse je n'arrive pas à éviter l'erreur 1004. :aie:

Pourriez-vous me dire comment m'y prendre pour coder tout ça, merci bcp ! :ccool:

EDIT: j'observe le même soucis lorsque j'utilise un FormulaR1C1

Bonjour,

En fait, pour la première ligne, "Cells(7, 2)" n'est pas qualifié, donc il s'agit de la cellule de la feuille active. La syntaxe est donc :

Code:

---

1 2 3

With Worksheets(ComboBox3.Value & " - " & ComboBox1.Value) .Range(.Cells(7, 2), .Cells(1000, 2).End(xlUp)).Copy End With

---

Même chose pour la ligne suivante.

Ca marche nickel en fait ! merci bien ! :ccool: