exixtance d'une feuille dans classeur

[Daydayer]

bonjour!

comment savoir si une feuille intitulée 'truc' existe dans un classeur excel, à l'aide de VB6?

merci d'avance!

 

[Creepy]

Hello All,

Essaie ca :

Private Sub CommandButton1_Click()
Dim i As Sheets

For Each Sheet In Worksheets
If Sheet.Name = 'Truc' Then
MsgBox 'la feuille existe !!', vbOKOnly, 'Oui ...'
End If

Next

End Sub

++

Creepy

 

[Bernard_XLD]

Bonjour

avec une petite fonction

Function Test_Feuille(Nom As String) As Boolean
On Error Resume Next
If ActiveWorkbook.Sheets(Nom) Is Nothing Then Else Test_Feuille = True
End Function

Cordialement, A+