Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

supprimer onglet

eddy13t

XLDnaute Junior
Bonjour, voila j'ai crée un userform avec une boite demandant de taper le nom d'un onglet à supprimer donc c'est tout bête voici le code:

Private Sub ok_Click()

Question = "Êtes-vous sur de vouloir supprimer cet atelier?"
rep = MsgBox(Question, vbYesNo + vbExclamation, Title:="confirmation")
If rep = vbNo Then ' Si l'utilisateur a cliqué sur "Non" alors,
rep = MsgBox("Vous avez décidé de ne pas supprimer l'atelier", vbInformation, "Annulation") 'Envoyer message d'annulation
End 'Fin
Else 'Sinon

Mavariable2 = delete_atelier.suppr_atelier
Sheets(Mavariable2).Delete
Application.DisplayAlerts = False
suppr_atelier = ""
delete_atelier.Hide
End If
End Sub


Le probleme que je rencontre est lorsque je tape un onglet qui n'existe pas, le vba me renvoie au débogage logique car il ne trouve plus la variable...Si vous avez une idée pour résoudre ce probleme merci dmen faire part

Bonne soirée à tous
 

Discussions similaires

Réponses
10
Affichages
581
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…