Discussion :

[drevilyv]

Bonjour,

j'essaye d'utiliser le code du 1er message de cette contribution. Cependant, lorsque je lance celui-ci, j'ai un bug à la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set FL1 = ThisWorkbook.Worksheets("Feuil1")

Je ne vois pas d'où peut venir le problème.

Par avance merci!

yvan

[mercatog]

Dans ton classeur, tu n'as de feuille nommée Feuil1

[kiki29]

Salut,pour tester l'existence d'une feuille par exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Function FeuilleExiste(ByVal sNom As String) As Boolean
Dim Ws As Worksheet
    On Error Resume Next
    Set Ws = Worksheets(sNom)
    If Err.Number <> 0 Then FeuilleExiste = False Else FeuilleExiste = True
End Function

ou lister les feuilles d'un classeur http://excel.developpez.com/faq/?pag...steFeuillesADO