|  
                                             
	Hello hello! 
	Ah, das sieht doch echt klasse aus :) Danke Hmm..Hmm..! Das Hinzufügen der Formeln funktioniert einwandfrei, allerdings werden die Dropdownlisten nicht entfernt, wenn ich die relevanten Einträge lösche -.- Da tut sich leider gar nichts. 
	Könntest du mir bitte diesen Ausdruck erklären? 
If ChkValidation(blnSub, clOffset, Len(Target.Formula), Target.Offset(0, clOffset), _
    3, 1, 1, strFormula1) Then Target.Offset(0, clOffset).Select
	Und diese hier bitte auch: 
	Private Function ChkValidation(IsSub As Boolean, IsOffset As Long, _ 
	=> Woher weiß denn die Private Function ChkValidation was IsSub bzw. IsOffset jeweils bedeuten? 
	If Len(vCell.Validation.Parent) > 0 Then 
	    If tLen = 0 Then  
	  
	=> Wieso braucht man diesen Fall denn überhaupt? Und was hat es denn mit dem vCell.Validation.Parent auf sich? 
	Vielen, vielen Dank für die Hilfe! 
	Viele Grüße 
     |