VBA - sprawdzenie czy dany arkusz istnieje

Witam,
Próbuje stworzyć plik który będzie mi sprawdzał czy w danej lokalizacji jest określony plik a w nim określone nazwy arkuszy. O ile ze sprawdzeniem czy plik jest poradziłem sobie ale mam problem ze sprawdzeniem czy w danym pliku jest określony arkusz. Sęk w tym że makro jest w innym pliku niż sprawdzany a chciał bym zrobić to bez otwierania pliku. Podsunie ktoś jakiś pomysł? Poniżej może wypociny :)

Sub Makro1()
Dim dane As Workbook 
Set dane = Workbooks.Open("C:\plik.xls")
For Each spr In ActiveWorkbook.Sheets
    If spr.Name = "Arkusz2" Then
        ThisWorkbook.Sheets("Arkusz2").Cells(2, 2).Value = "OK"
    End If
Next spr
End Sub

Bez otwierania to się nie da... Chyba że ... przez ADO :)

Zrobiłem to jednak z otwieraniem plików ale dodatkowo z Application.ScreenUpdating oraz ReadOnly i w miarę działa :)