Office: Bereich im VBA Code aus Zelle auslesen

Hallo Profis,

gibt es bei Excel die Möglichkeit den Bereich in VBA Codes aus Zellen eines Tabellenblatts auszulesen?

Bsp.:

Im Code steht: Range("B9:BJ299").Select

"B9:BJ299" soll nun aus Tabelle1 G7 ausgelesen werden.

Vielen Dank
Gruß Galli

:)

 

Moin!
Code:

Zum Thema .Select solltest Du Dir dieses Tutorial mal durchlesen:
Online - Excel Programmierung VBA Makro: Achtung Makrorekorder oder Wer selektiert denn da?

Gruß Ralf

 

Danke erst einmal.
Aber da fehlt doch noch die Angabe in welchem Tabellenblatt der Bereich steht!?
Sorry, ich habe nicht viel Ahnung von Evcel! *rolleyes.gif*

Gruß
Galli

 

Prinzipiell nicht, auch wenn es immer sinnvoll ist, korrekt zu referenzieren.
Ohne Angabe des Sheets beziehen sich Codes auf das ActiveSheet.
Mehr ist aus Deiner Threaderöffnung aber auch nicht herauszulesen.

Gruß Ralf

 

Sorry, vielleicht habe ich mich ganz klar ausgedrückt. Ich versuche es noch mal!
Ich habe einen Code in dem ein Bereich in einer Tabelle angesprochen werden soll.
Code:

Welche Tabelle das ist wird vorher im Code definiert. (Das können verschiedene Tabellen sein)
Von solchen Codes, die verschiedene Bereiche ansprechen habe ich mehrere.
Daher habe ich mir zur besseren Übersicht in der gleichen Datei eine Tabelle (Übersicht Makros) angelegt, in der alle Makros mit den jeweiligen Bereichsangaben hinterlegt sind. Bsp.: G7=B9:BJ299
Sollte ich nun mal die Bereiche ändern müssen wäre es hilfreich, wenn ich sie nur in dieser Tabelle ändern müsste und sich die Codes die Bereichsangaben aus dieser Tabelle holen würden.

Ungefähr so:
Gehe in Tabelle "Übersicht Makros" in Zelle G7 und übernehme den dort eingetragenen Bereich in den Code.

Gruß Galli

 

Hi,

nach diesem Prinzip:

Code:

 

Hallo Karin,
vielen Dank. Genau das war's, was ich gesucht habe! :-)
Wie würde der Code aussehen, wenn mehrere Bereiche angesprochen werden sollen?
Bsp.: ("B9:BJ1000,BQ9:BR1000")

Gäbe es auch eine Möglichkeit wenn beide Bezugswerte in verschiedenen Zellen stehen würden?
Bsp.:
G7=B9
H7=BJ299
Und wenn du schon dabei bist, wenn 4 Werte in separaten Zellen stehen? '-)
Bsp.:
G7=B9
H7=BJ1000
I7=BQ9
J7=BR1000

Gruß Galli

 

Hi Galli,

in diesem Fall würde ich 2 Variablen verwenden und die Teilbereiche zusammensetzen:

Code:

 

Hi Karin,
der Code funktioniert super. Danke!
Ich bräuchte jetzt nur noch einen Code dafür, wenn 2 Bezugswerte in verschiedenen Zellen stehen würden?
Bsp.:
G7=B9
H7=BJ299
Meine Versuche die bisher von dir erhaltenen Codes abzuwandeln haben leider nichts gebracht! :-(

Gruß Galli

 

Hi Galli,

genau wie der Code aus meinem vorhergehenden Beitrag, nur dass du anstelle von 2 Variablen 1 Variable verwendest und die letzte Zeile dann so aussieht:

Code:

Da es nur 1 Bereich ist, muss man in diesem Fall nicht mit Union arbeiten - das ist nur erforderlich, wenn es sich um mehrere nicht zusammenhängede Bereiche handelt.

 

Hallo Karin,
es kann manchmal so einfach sein. Hab vielen Dank!

Gruß Galli