Problem z Makro "Run time error 424 Object required".

Dzień dobry,

Na wstępie powiem, że jeśli chodzi VBA jestem w tym nowy. Próbuję zaktualizować plik Excel zrobiony w wersji 2002 do Excela 2016. Niestety po otwarciu w nowej wersji pojawia się problem z Makrem. Ma ono na celu skopiowanie konkretnych danych z pliku z rozszerzeniem ".rap" do konkretnego miejsca w tym arkuszu. Komunikat który się pojawia to "Run time error 424 Object required".

Zaznaczony zostaje na żółto ten fragment kodu:

    .FileType = "XRD2E*.rap"
    .LookIn = "\\192.168.3.42\rap" 

Private Sub Wklej_I_Wypelnij()

  Dim Pozycja As Integer 
  Dim tekst As String 
  Dim numer As Integer 
  Dim Data As String 
  Dim FoundFlag As Boolean
  Dim Data_Raportu As String
  Dim Nazwa_Aplikacji As String
  Dim Sciezka_Aplikacji As String
  Dim Numer_Tekstu As Integer
  Dim bajty As Long
  Dim wskaznik As Long
  Dim PoprzedniWskaznik As Integer
  
  Data_Raportu = Date - 1
  Pozycja = 0
  Zmienne_We = Array(472, 473, 475, 476, 495, 496, 497, 510, 511, 512) 'Raport węglowodorów
  Zmienne2_We = Array(109, 145) 'Raport urządzeń
  Zmienne_Wy = Array(2, 4, 5, 7)
  
  miesiace = Array("Styczeń", "Luty", "Marzec", "Kwiecień", "maj", "czerwiec", "lipiec", "sierpień", "wrzesień", "październik", "listopad", "grudzień")

  Nazwa_Aplikacji = ActiveWorkbook.Name

  With objFileSearch
  
    .FileType = "XRD2E*.rap"
    .LookIn = "\\192.168.3.42\rap" 
    .Execute

Może ktoś ma jakiś pomysł w czym problem?