Hallo zusammen 

ich bringe gleich noch ne Frage hinterher :

Nach mehrmaligem erfolgreichen Durchlauf bring der Code jetzt "Run Time 91 Object variable oder with block not set"

und markiert den IF Block gelb
 If exist = TextBox1.Value Then

ich habe jetzt mal gelesen und versucht das .Find durcj LookIn and LookAt zu erweitern weil dies wohl Fehler bringen soll aber es läuft nicht 
gleiche Meldung, zuvor lief es zuverlässig und es wurde zum Code oben nix geändert.

Das war der Versuch es zu verbessern
Set exist = Range("Part_no.").Find(What:=TextBox1.Value, LookIn:=xlFormulas, LookAt:=xlWhole)

hat jemand bitte einen Ansatz?

Danke