existe

Salut, Voici un code inspirer du code de Yeahou : Classeur_Ouvert Function Feuille_Existe(ByVal Nom_Feuille$) As Boolean Application.Volatile On Error Resume Next Dim Test_Objet As Worksheet Set Test_Objet = Worksheets(Nom_Feuille) If Not Test_Objet Is Nothing Then...