Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Hallo liebes Forum,
ich habe folgendes Problem:
Ich hab zwei Excelliste und für eine von beiden möchte ich ein Makro schreiben.
Liste 1 hat in Spalte C Seriennummern und in Spalte H sind die dazugehörigen Preise.
Liste 2 hat in Spalte B die Seriennummern und in Spalte M neue Preise.
Nun möchte ich, dass mein Makro mir die alten Preise ( Liste 1 Spalte H) duch die neuen Preise ( Liste 2 Spalte M ) automatisch ersetzt. Die Seriennummer der Liste zwei sind nicht in der selben Reihenfolge angeordnet wie die der Liste 1.

Nun habe ich folgende Vba geschrieben :

Sub Aktualisieren()
Dim c As Range
For Each c In Workbooks("Liste1.xls").Worksheets("Tabelle2").Range("B10","B2100")
For Each c2 In Workbooks("Liste2.xls").Worksheets("Tabelle1").Range("M10", "M2100")
If c = c2 Then
c2.Offset(0, 5).Value = c.Offset(0, 11).Value
End If
Next
Next
End Sub

Die Fehlermeldung taucht in der erste "for each" Zeile auf.
Das Problem ist dass ich jetzt die Fehlermeldung : Laufzeitfehler "9" Index außerhalb des gültigen Bereichs erhalte.
Und ich finde einfach meinen Fehler nicht. Wäre sehr nett wenn Ihr mir helfen könntet.