Bonjour
Je voudrais verifier lorsque j'ouvre un workbook que 2 feuilles existent. dans ce cas l'application peut se poursuivre. Comment puis je verifier les noms des feuilles se trouvant dans un document xls?
Voici mon code:
Dim Pos As Integer
Dim start As Integer
Dim fileopen As Variant
Dim tmp As Variant
Application.ScreenUpdating = False
fileopen = Application.GetOpenFilename('Excel Files (*.xls), *.xls', , 'Inventory')
If fileopen = False Then
MsgBox 'Please try again', vbInformation
Exit Sub
End If
Workbooks.Open (fileopen)
Verifier l'existence d'une feuille nommee 'resources'????????????
si elle existe on l'active??????????????????????????????????
Application.Sheets('resources').Select
Merci pour vos reponses
Sylvain