mit der Codezeile
Debug.Print Range("KuSH_Anzahl").Resize(Range("KuSH_Anzahl").Rows.Count + lng_Ver_Anzahl, Range("KuSH_Anzahl").Columns.Count).Address
erhalte ich im Direktbereich $D$2:$D$69
Wie kann ich nun dem Range("KuSH_Anzahl") diesen Adresse zuweisen?
Gruss, Peter