Erreur si onglet existe déjà lors de la copie

Bonsoir le forum

j'ai un souci avec mon code de copie d'onglet, j'aimerai copier cette feuille en proposant directement de la renommer, jusque la sa marche mais....

lorsque qu'on ré exécute la macro avec le nom dans l'initbox forcement Excel n'accepte pas...

donc il faudrait qu'il me contrôle si le nom existe déjà... et la je nage

Sub creerdeb()
Dim num As String

num = InputBox("Tapez le préfixe souhaité")

With Worksheets("DEB")
    .Visible = True
    .Copy after:=Worksheets(Worksheets.Count)
    ActiveSheet.Select
    .Visible = False
End With

ActiveSheet.Name = "D " & num

End Sub

merci d'avance pour votre aide

Bonjour

Au bas de cette page, tu as un exemple réalisé par Banzai

https://forum.excel-pratique.com/excel/indiquer-qu-une-feuille-excel-existe-deja-t47285.html

Cordialement

Merci pour le lien...

J irai voir tous sa demain matin...

J'avoue qu il est vrai que je n ai pas fait la recherche au préalable dans les anciens post... Dsl

Mais encore bravo pour tous le travail que vous faite