Abgleich von Zellinhalt mittels Application.Match
24.07.2013 11:23:46
Zellinhalt
ich schlage mich momentan mit einem kleinen Problem rum, bei dem ihr mir sicher helfen könnt.
Ich habe folgenden Code-Schnipsel:
If IsError(Application.Match(Me.TextBox_Druck, wsBasis.Columns(1), 0)) Then
MsgBox "Diese fortl. Nr. ist nicht vorhanden!", vbCritical, "Fehler"
Else
Ich möchte mit dem If-Schnipsel nun erreichen, dass, bevor der Code zum Ausfüllen und Drucken ausgeführt wird, eine Abfrage in der Spalte A stattfindet. Ist die Nummer in Spalte A vorhanden, soll der Code ausgeführt werden, wenn nicht soll die obige Fehlermeldung erscheinen. Funktioniert soweit auch, nur kommt jedesmal die Meldung, dass die fortlaufende Nummer in der Spalte nicht vorhanden ist, obwohl sie es ist. Denke es ist nur nen kleiner Fehler.
Vielen Dank für Eure Hilfe.
MfG
Chris
Anzeige