Başka Bir Dosyada veri arama

[oray]

Sub Find_First()
    Dim FindString As String
    Dim Rng As Range
    FindString = InputBox("Aranacak Deger")
    If Trim(FindString) <> "" Then
        With Sheets("C:\Documents and Settings\ogungor\Desktop\[deneme.xlsx]M50").Range("A:A")
            Set Rng = .Find(What:=FindString, _
                            After:=.Cells(.Cells.Count), _
                            LookIn:=xlValues, _
                            LookAt:=xlWhole, _
                            SearchOrder:=xlByRows, _
                            SearchDirection:=xlNext, _
                            MatchCase:=False)
            If Not Rng Is Nothing Then
                Application.Goto Rng, True
            Else
                MsgBox "Bulunamadi"
            End If
        End With
    End If
End Sub

Arkadaşlar üstteki kodu yazdmı fakat sürekli hata alıyorum Sheets kısmında, öyle bir dosya ve M50 diye bir sheet'i var. nerde hata yapıyor olabilirim?

Subscript out of range hatası geliyor.