Office: Doppelter Eintrag einer Auftragsnummer

Hallo!
Ich habe folgendes Problem, und zwar muss ich die Spalte O per VBA auf doppelte Einträge kontrollieren.
Die Einträge sind Kombinationen aus Buchstaben und Zahlen. zB EL021018 oder S250125
Es sind immer 6 Zahlen und 1 oder 2 Buchstaben. Das Format ist immer Buchstaben und dann Zahlen.
Wie kann ich nur die Zahlen auf doppelte Einträge kontrollieren und die Zahlen immer 6-stellig sein sollen sobald ich die Textbox verlasse?

Danke im Voraus für euere Hilfe

 

Hallo,

die Zahl ist immer Right(cells(i,j),6). Eine Prüfung könnte so aussehen:

Code:

dim Tx as string, rng as range
Tx = right(Textbox1.value,6)
set rng = sheets(1).cells.find(Tx,, xlvalues,xlpart)
if rng is nothing then
   msgbox "keine Duplette"
else
   msgbox "Duplette"
endif

Den Code in das Exit-Event der Textbox.

mfg

 

Hallo Fennek,
Funktioniert super, herzlichen Dank.

SG