Set Range Stückliste von "Sl_Anf" bis "Sl_Ende"
05.06.2018 08:38:28
"Sl_Anf"
mein Grundproblem: Ich möchte eine Range von einem Namen zu einem anderen Namen definieren.
Ich dachte, ich hätte das Problem schonmal gelöst mit
Set DateinamenRange = ActiveSheet.Range(Right(ThisWorkbook.Names("DateinamenMatrixAnfang").RefersTo, 4) & ":" & Right(ThisWorkbook.Names("DateinamenMatrixEnde").RefersTo, 4))
Ihr seht, da werden Strings editiert und immer die 4 letzten Zellen benutzt, das hat bei den "Dateinamen" auch gut funktioniert, aber unsere Stückliste hat leider mehr als 99 Zeilen und darum müsste man dann die letzten 5 Stellen verwenden. Und da dachte ich mir, es muss doch auch eine einfachere Lösung geben wie
Dim Stückliste as Range
Set Stückliste = ActiveSheet.Names("Sl_Anf":"Sl_Ende") 'oder so in der Art
Bin für jede Hilfe dankbar, allgemein verstehe ich die Funktionen .RefersTo, .Value, .Names etc. nicht wirklich bzw. finde die Arbeit damit nicht sehr intuitiv, gibt es vielleicht einen Artikel, der einem das Ganze Thema näherbringt?
Danke im Voraus!