Left-Funktion zum Zellenvergleich
11.07.2005 13:26:22
Steffen
ich habe ein Problem damit, einen Vergleich der ersten sechs Zeichen beider Zellen von zwei Arbeitsmappen durchzuführen.
Das Ganze sieht in etwa wie folgt aus und funktioniert nicht.
Ohne die Left-Funktion funktioniert es, hilft mir aber leider nicht.
Fehlermeldung: "Objekt unterstützt diese Eigenschaft oder Methode nicht"
If Workbooks("af4.xls").Worksheets("Tabelle1").Left(Cells(alt_z, alt_sp), 6) = _
Workbooks(Datei, in der das Makro ausgeführt wird).Worksheet("Tabelle1").Left(Cells(neu_z, 2), 6) Then
merker1 = 1
End If
Vielen Dank
Gruß
Steffen