Déplacer onglet

Bonjour,

j'aimerais déplacer un onglet que je créer derrière tout les autres onglets existant. j'ai essayé avec ce code mes ça ne marche pas

Worksheets.Move after:=Sheets.Count

Re,

Tu peux adapter le code suivant qui sert à créer un nouvel onglet à la fin du fichier ...

Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets.Add(After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count))
ws.Name = "NouvelOnglet"

Bonsoir

.Move After:=Sheets(Sheets.Count)

merci beaucoup