Abgleich mit Datensatz - Laufzeitfehler 13
09.05.2007 21:52:29
Baldur
ich habe auf einem Arbeitsblatt "Daten" einen bestimmten Datensatz hinterlegt. Wenn ich auf einem Arbeitsblatt "Arbeit" jetzt in einer bestimmten Spalte einen Eintrag vornehme, dann will ich den Datensatz daraufhin durchsuchen und die zugehörigen Daten auf das Blatt "Arbeit" kopieren.
Das Ganze funktioniert soweit auch. Mein Problem ist: Es geht nur, wenn ich den Text von Hand in das Feld (auf dem Blatt "Arbeit" eingebe. Wenn ich den Text jetzt aus einem Feld kopiere oder den Text in dem Feld lösche, dann kriege ich einen Laufzeitfehler 13 (Typen unverträglich).
Woran kann das liegen? Wieso enthält Target dann nicht den Text, der gerade in das Feld kopiert wurde?
Ich hoffe, mir kann hier jemand helfen.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim intRowCnt As Integer
'Check if it was the name of ta spell that has been edited
If (Target.Column = 2 And Target.Row >= 9 And Target.Row