Hallo und einen schönen guten Abend,

ich würde mich gerne mit nachfolgendem Code der mir mit freundlicher Unterstützung zur Verfügung gestellt wurde, an Euch wenden, da hier leider beim mir ein Fehler auftaucht.

Ablauf:

In Tabelle 1 wird in Spalte J eine Zahl eingetragen. Diese Zahl soll dann an Tabelle 2 Spalte L übergeben werden, wenn 2 Parameter in beidenTabellen identisch sind. Die Parameter sind in beiden Fäälen nicht nur numerisch es können auch Buchstaben sein.

Fehler:

Wenn ich in Tabelle 1 Spalte J die Zahl eingeben, erscheint der Laufzeitfehler 13 und folgendes Codeschnippsel wird gelb markiert.


If Sheets("Tabelle2").Cells(Wiederholungen, 1) * 1 = Debitorennummer* 1 And _
Sheets("Tabelle2").Cells(Wiederholungen, 5) * 1 = Materialnummer * 1 Then............

Hat von den Profis jemand eine Idee was ich ändern müßte. Habe schon die *1 rausgenommen, aber dann werden die Zahlen gar nicht mehr übertragen.

Ich danke Euch vielmals vorab für die Unterstützung.

Viele Grüße, meikel