Création et/ou suppression d'un onglet

Bonjour le forum,

Je reviens vers vous pour solliciter vos compétences.

Le petit bout de macro ci-dessous copie l’onglet "Liste AF à compléter par DATES" avec le nom par défaut « "Liste AF à compléter par DA(2 ").

Question : comment je peux modifier ce bout de macro pour que l’onglet copié s’appelle « doublon » et si par hasard il est déjà existant qu’il soit supprimé pour être créé par la nouvelle copie.

La finalité c’est que cet onglet doublon me permet de travailler sur les données issues de l’onglet principal ("Liste AF à compléter par DATES") sans risque de les effacer ou de faire une fausse manip.

'// création de l'onglet doublon et suppression éventuelle du précédent

Sheets("Liste AF à compléter par DATES").Select

Sheets("Liste AF à compléter par DATES").Copy Before:=Sheets(7)

Sheets("Liste AF à compléter par DA (2").Select

Je ne joins pas de fichier puisqu'il s'agit juste d'adapter des lignes de code.

Cordialement.

Bonjour,

Tu n'as pas besoin de supprimer l'onglet "DOUBLON"

- Tu créés un onglet "DOUBLON" et dans ta macro tu viens effacer le contenu avant de faire ton copie-coller :

Sub Macro()

Sheets("DOUBLON").Select

Cells.Select

Selection.Delete Shift:=xlUp

Sheets("Liste AF à compléter par DATES").Select

Cells.Select

Selection.Copy

Sheets("DOUBLON").Select

Range("A1").Select

ActiveSheet.Paste

End Sub

Bonjour Philippe, bonjour le forum,

Essaie comme ça :

Dim O As Worksheet

For Each O In Worksheets
    If O.Name = "doublon" Then
        Application.DisplayAlerts = False
        O.Delete
        Application.DisplayAlerts = True
        Exit For
    End If
Next O
Sheets("Liste AF à compléter par DATES").Copy before:=Sheets(7)
ActiveSheet.Name = "doublon"

Impeccable . Merci pour ta rapidité "ThauThème".

Je mets en résolu.