Ошибка VBA 13: функция $ Trim должна быть строкой, но я стал целым

Question

цель подпрограммы - Найти содержимое строки данных с данными, которые закончились ошибкой ссылки

       strBelegblattname = Trim$(mod_Globalkonstanten.pconBelegBlattName & mod_Globalkonstanten.gconstrDerUnterstrich & strTeilblattname)

       '* Pivot-Daten durchlaufen

       lngLetzteZeile = 0
       lngLetzteZeile = objxlsArbeitsblatt.Cells(Rows.Count, 2).End(xlUp).Row

       lngZielZeilenZaehler = conStartZielZeile

       For lngZeilenZaehler = 5 To lngLetzteZeile - 1

        blnFehlersatz = False '* zunaechst wird kein Satz als falsch angenommen

        If blnFehlersatz = False Then

            If Not IsEmpty(objxlsArbeitsblatt.Cells(lngZeilenZaehler, mod_Globalkonstanten.gconlngPivotOrgIDSpaltenNummer).Value) Then
                If conFehler = Trim$(objxlsArbeitsblatt.Cells(lngZeilenZaehler, mod_Globalkonstanten.gconlngPivotOrgIDSpaltenNummer).Value) Then
           On Error Resume Next

                    blnFehlersatz = True

                End If
            End If

        End If

        If blnFehlersatz = False Then

           If Not IsEmpty(objxlsArbeitsblatt.Cells(lngZeilenZaehler, mod_Globalkonstanten.gconlngPivotBestellNrSpaltenNummer).Value) Then
            *****  If conFehler = Trim$(objxlsArbeitsblatt.Cells(lngZeilenZaehler, mod_Globalkonstanten.gconlngPivotBestellNrSpaltenNummer).Value) Then******

                 blnFehlersatz = True

              End If
           End If

        End If

Watch :Trim$(objxlsArbeitsblatt.Cells(lngZeilenZaehler, mod_Globalkonstanten.gconlngPivotOrgIDSpaltenNummer).Value) : <Typen unverträglich> : Integer :here a string is expected 
conFehler="Fehler 2042"

ОШИБКА между **** ****