VBA – Laufzeitfehler 91 bei etwas Einfachem?

VBA – Laufzeitfehler 91 bei etwas Einfachem?

Bei einer einfachen Suche nach einer ID ist ein Laufzeitfehler 91 aufgetreten ... Warum? (GELÖST: Die Suche ist fehlgeschlagen, da die Zelle als Zahl mit Komma formatiert war – komisch, aber wahr. Habe das Format auf „allgemein“ geändert und es funktioniert einwandfrei! Danke, Leute!)

Public Sub SearchID()
      Dim foundCell As Range
      Dim searchEmpID As String
      Dim searchRange As Range
      Dim rowFound As Integer

      searchEmpID = "EmpID_0112"
      Set searchRange = Sheets("HoursData").Range("DY2:DY999")
      Sheets("HoursData").Select
      Set foundCell = searchRange.Find(What:=searchEmpID, LookIn:=xlValues, LookAt:=xlWhole, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False)

MsgBox Sheets("HoursData").Range("DY115").Value '<<<<< Die Daten/ID sind da, siehe Screenshot.

      rowFound = foundCell.Row      '<<<<<<<<<<<< Why this produces Runtime Error 91/Object Variable Not Set...???

End Sub

Die Daten sind da, kein Problem.

Die Daten lauten dort genau „EmpID_0112“, wie Sie sehen können.

verwandte Informationen