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
|