Namensbereich und Makro relativ
03.08.2006 11:39:36
Sina
ich habe ein nettes Excel-Sheet, dass immer
mehr an Komlexität gewinnt.
Nun ist meine Idee, ich baue über eine Userform eine Art "Eingabemaske"
So würde die Sache übersichtlicher.
Ich hole mir die Daten aus dem ursprünglichen Tabellenblatt und zeige sie strukturiert an. Dort sind aber die Bereiche fest im Makrocode hinterlegt.
z.B wird die Combobox folgendermaßen befüllt:
With cmb_kto
.Clear
.AddItem ActiveWorkbook.Sheets(2).Range("B7").Value
.AddItem ActiveWorkbook.Sheets(2).Range("B8").Value
.AddItem ActiveWorkbook.Sheets(2).Range("B9").Value
End With
Das ist aber nicht sehr praktisch,weil ich nun alles umschreiben müßte, wenn ich mal eine neue Zeile einfüge.
Deswegen habe ich der Zelle "B7" einen Namen gegeben.
Der Wert wäre dann
"='Allgemeine Annahmen'!$B$7" (ActiveWorkbook.Names(2).value)
Nun, wie kann ich denn diesen Werte so zerlegen, dass ich mit folgenden Werten arbeiten kann
"Nimm die nächsten darunterliegenden 10 Zellen und schreibe Sie in Combobox cmb_x"?
bzw.
"Gehe 3 Spalten nach links und gib mir den Zellenwert aus"
Kann mir jemand helfen?
Viele Grüße
Sina