Function Stringvergleich()

A = CInt(Worksheets(2).Range("B" & Zaehler).Value) <-----

A = CStr(Worksheets(2).Range("B" & Zaehler).Value)

A = Len(Worksheets(2).Range("B" & Zaehler).Value)

B = Len(Worksheets(2).Range("C" & Zaehler).Value)

MsgBox (A)

MsgBox (

End Function

Warum funktioniert das so nicht? Wird die Funktion in dem Programm aufgerufen, erscheint die Fehlermeldung "Laufzeitfehler 1004: Anwendungs- oder objektdefinierter Fehler.

was willst du denn machen?

den wert aus Zelle "B" & Zaehler A bzw. B zuweisen oder was? :confused:

Hi,

das kann folgende Ursachen haben:

- Ein Argument enthält einen ungültigen Wert. Eine häufige Ursache diesesProblems ist der Zugriffsversuch auf ein Objekt, das nicht existiert (wenn Sie z.B. versuchen, Workbooks(5) zu verwenden, obwohl nur drei Arbeitsmappen geöffnet sind).

- Die Methode kann im angewendeten Zusammenhang nicht verwendet werden. Bei einigen Methoden des Range-Objekts ist es beispielsweise erforderlich, daß der Bereich Daten enthält. Ist dies nicht der Fall, schlägt die Methode fehl.

- Ein externer Fehler ist aufgetreten, wie z.B. ein Fehler beim Lese- oder Schreib-Zugriff auf eine Datei.

mh also ich hab den Code, so wie er da steht getestet... ich hab keinen Fehler bekommen... aber ich würde dir raten statt diesem Range zeug das zu nehmen:

Tabelle2.cells(Zeile,Spalte)

damit lässts sich etwas besser arbeiten und vielleicht verschwindet damit auch dein Fehler