Fusion de 2 feuilles excel en une seul en VB

Bonsoir,

J'aurai besoin de votre aide, j'ai cherché un peu partout sur le net je n'est pas trouver se que je voulais faire. (Je suis pas vraiment bon en VB)

Alors je vous explique ma situation j'ai un fichier excel dans le quel j'ai 2 feuilles identiques avec la même forme. Je veux simplement copier les données des deux feuilles et les mettres dans ma 3ième feuilles qui est vide sans enlever les doublons.

Je veux faire ça en VB mais je suis très mauvais help meeeee :cry::cry::cry:

Je vous remercie d'avance.

Bonsoir,

l'Enregistreur de macros est l'ami des débutants : il livre une base de code sur un plateau ‼

J'ai trouvé la solution. Je laisse le code si un jour quelq'un en a besoin.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Sub copier()   Dim lastlig As Long Dim s As Byte     Sheets("Regroupement").[(A6:A200000):(AX6:AX1000100)].ClearContents   For s = 3 To 4   With Sheets(s)   lastlig = .Cells(Rows.Count, 1).End(xlUp).Row .Range("A6:AX" & lastlig).Copy Sheets("Regroupement").Cells(Rows.Count, 1).End(xlUp)(2)   End With Next s     End Sub

---