Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.10.2025 19:34:56
Eine Zelle in 3 Spalten teilen
20.10.2025 19:24:08
Excel Form befüllen
20.10.2025 19:03:51
wenn istleer funktioniert nicht wegen formel
20.10.2025 13:56:55
Wenn Funktion mit Xverweis oder ähnlich
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1284to1288
1284to1288
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Range Variable

Forumthread: Range Variable

Range Variable
29.10.2012 08:49:55
Manuela
Guten Morgen,
irgendwie habe ich gerade ein Brett vor dem Kopf und benötige Hilfe. Ich habe mir in Zelle A2 einen Zellenbereich mit Verketten von Sverweisen gebastelt. In meinem Fall steht da jetzt H4:J12 und dieser Bereich soll kopiert werden. Mein Makro möchte aber irgendwie nicht funktionieren... Hat jemand einen Tipp für mich?

Sub DatenAktu()
Dim Bereich As String
Bereich = Range("A2").Value
Range(" & Bereich & ").Copy
end sub

Liebe Grüße,
Manu

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Range Variable
29.10.2012 08:55:04
hary
Hallo
Versuchs so. 
Range(Bereich).Copy

gruss hary

AW: Range Variable
29.10.2012 08:57:13
Beverly
Hi Manu,
   Dim Bereich As String
Bereich = Range("A2").Value
Range(Bereich).Copy
oder 
   Dim rngBereich As Range
Set rngBereich = Range(Range("A2").Value)
rngBereich.Copy
Set rngBereich = Nothing

Anzeige
Danke!
29.10.2012 09:06:47
Manuela
Danke Euch beiden! :-)
Manchmal kann es so einfach sein... hehe
LG,
Manu

Hab' doch doch noch ne Frage..
29.10.2012 12:24:07
Manuela
Hallo,
ich benötige nochmal Hilfe.. :-(
Irgendwie funktioniert meine Variable nicht so wie gewünscht. Hat jemand einen Tipp für mich?

Sub Test()
Dim BereichListe As String
BereichListe = Range("B1").Value 'Hier steht ein Wert per Sverweis
Range("K10:K18").Copy
Range("L & BereichListe & ").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False,  _
Transpose:=False
Range("M10:M18").Copy
Range("N & BereichListe & ").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False,  _
Transpose:=False
End Sub

LG,
Manu

Anzeige
AW: Hab' doch doch noch ne Frage..
29.10.2012 12:37:08
Rudi
Hallo,
Range("L" & BereichListe).Select
Gruß
Rudi

AW: Hab' doch doch noch ne Frage..
29.10.2012 12:38:51
hary
Hallo
Wenn in B1 eine Zahl rauskommt dann: 
Dim BereichListe As Long
BereichListe = Range("B1").Value 'Hier steht ein Wert per Sverweis
Range("K10:K18").Copy
Range("L" & BereichListe).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("M10:M18").Copy
Range("N" & BereichListe).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False

gruss hary

Anzeige
AW: oder einfach
29.10.2012 12:43:40
hary
Hallo nochmal
einfach so: 
Dim BereichListe As Long
BereichListe = Range("B1").Value 'Hier steht ein Wert per Sverweis
Range("L" & BereichListe).Resize(9, 1).Value = Range("K10:K18").Value
Range("N" & BereichListe).Resize(9, 1).Value = Range("M10:M18").Value

gruss hary

Anzeige
Vielen Dank!
29.10.2012 15:11:19
Manuela
Danke Euch beiden :-)
LG
;

Forumthreads zu verwandten Themen

Formel über VBA in Range.
Tom

Hi,
ich Versuch eine Summenformel
=SUMME(A3:A29)
verzweifelt über VBA dynamisch einzutragen.
Die Summe muss von A bis J eingetragen werden. Jedesmal mit dem entpsrechenden Buchstaben nicht immer mit A.
Hab das so versucht:
For k = 2 To 10 'Range(Cells(k, 29), Cells(...
13.08.2008 11:41:00
Thread-ID: 1001455
4 Beiträge
VBA - if anweisung mit variable
Thomas

Hallo,
ich habe ein blöds Problem und zwar habe ich folgendes If Abfrage in einer Forschleife in Pseudo:
Wenn A1 kleiner als A2 tu dies sonst tu das
VBA:
For i = 2 To 5 If "A" & i
Irgendwie trifft dort immer nur Else ein, ich glaube es liegt an der Bedingungsformulier...
16.10.2008 10:10:50
Thread-ID: 1016763
4 Beiträge
Anzeige
Excel-Makro mit variablen Zeilen
Hans-Peter

Hallo,
Ich bin auf der Suche nach einer Excel-Funktion oder einem Makro, welches es mir ermöglicht, eine variable Anzahl Zeilen (mit definiertem Inhalt in der letzten Zeile) in ein neues Arbeitsblatt zu kopieren.
09.11.2008 22:40:00
Thread-ID: 1023114
5 Beiträge
VBA Range Definition
Karen

Hallo Forum,
ich habe ein kleines Problem in meinem Makro.
Ich möchte eine Range abbilden, leider überträgt das Makro aber immer nur die Zeile 6.
For i = 2 To 256
If Cells(3, i).Value = datum Then
Range(Cells(6, i), Cells(40, i)).Copy
Selection.Copy
Cells(6, i + 1)...
22.12.2008 16:21:00
Thread-ID: 1034798
14 Beiträge
Kurze Variablendeklaration in VBA?
Gunnar

Hi Leute,
gibt es in VBA keine andere Möglichkeit, Variable zu deklarieren außer
Dim abc As Integer, abd As Integer abe As Integer
usw.? Brauch über 100 Variable, das ist mühselig.
Typenkennzeichen dürfen übrigens nicht verwendet werden, falls das wichtig ist.
Grüße Gunnar...
28.01.2009 18:36:11
Thread-ID: 1044672
5 Beiträge
Anzeige
Range einer Variable zuweisen
Mario

Hallo
Ich wollte die selection.Range einer variablen zuweisen, damit ich danach die selection verändern kann und trotzdem noch weiss, was vorher selectiert war.
Ich habe schon folgende Varianten versucht:
Dim r As Range r = selection.Range ''Fehlermeldung r = Range(Cells(selection...
07.02.2009 08:42:07
Thread-ID: 1047988
21 Beiträge
VBA Abspeichern in variablen Ordner
Danomat

Hi,
folgendes Problem
In Zelle C1 steht der aktuelle Monat. Nun möchte ich die Datei als PDF abspeichern:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"G:\Dokumente\Berichtswesen\Monatsreporting\02 Februar\Test.pdf" _
, Quality:=xlQualityStandard, IncludeDo...
13.03.2009 12:37:34
Thread-ID: 1059831
10 Beiträge
variable Zeilenanzahl kopieren, einfügen (VBA)
Alex

Hallo Leute,
In meiner Arbeitsmappe kopiere ich eine! Zeile (aus dem TabBlatt „Grundformular“) - via Doppelklick auf einen Namen in „Übersicht“ - in andere TabBlätter.
(das geht wunderbar)
Sieht jemand eine Möglichkeit ob/wie das ganze mit einer variablen Zeilenanzahl, die im „Grund...
18.03.2009 17:23:56
Thread-ID: 1061522
3 Beiträge
variabler SVerweis mit VBA
Jonathan

Hallo zusammen,
in einer Tabelle sind verschiedene Zeilen mit einem "x" in Spalte C markiert. Die Anzahl der "x" variert.
Nun versuche ich ein Makro zu erstellen, welches mir, wenn eine Zeile mit einem "x" markiert ist in
Spalte B einen SVerweis (Suchwert steht in Spalte A) einträg...
17.06.2009 14:28:57
Thread-ID: 1082250
3 Beiträge
Variable Liste in VBA
Diana

Liebes Forum,
ich habe ein Problem. Ich lese mit einem VBA-Makro Messwerte aus. Diese Messwerte werden über einen Namen auf einem anderen Rechner angesprochen. Derzeit gebe ich diese Namen (Adressen) direkt in das Makro ein.
strSQL = "SELECT k055z02_0.Zeit, k055z02_0.A00100001, ..., .....
14.08.2009 14:59:47
Thread-ID: 1096000
4 Beiträge
Variable in Dateiöffnungsdialog integrieren
Robert

Hallo und Mahlzeit!
Meine Versuche schlugen leider fehl, deshalb die Frage und Bitte zugleich:
Ist es möglich, die Variable, in Zeile '0' als Auswahlkriterium in Zeile '4' so zu integrieren, daß nur die Dateien zur Auswahl erscheinen, die auch die Variable enthalten? Wenn ja, wie?
0...
04.09.2009 13:04:27
Thread-ID: 1100612
3 Beiträge
makro - datei mit variabler Datum öffnen
meixner

Hallo zusammen,
brauche ein Makro, daß eine Datei automatisch öffnet, deren Datum sich quartalsweise ändert!
Datei = "I:\99\8801\FM\IA files \Fondsbestand_20090907"
Datei heißt im Dez. aber Fondsbestand_20091207. Kann ich das Datum irgendwie variabel anlegen?
mit Datei = "I:\99\...
03.10.2009 21:02:11
Thread-ID: 1107038
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Excel VBA: Arbeiten mit Range Variablen

Schritt-für-Schritt-Anleitung

Um in Excel VBA mit Range Variablen zu arbeiten, folge diesen Schritten:

  1. Definiere die Variable: Lege zuerst die Variable für den Bereich fest. Du kannst entweder einen String oder ein Range-Objekt verwenden.

    Dim Bereich As String
Bereich = Range("A2").Value

  2. Kopiere den Bereich: Verwende die Variable, um den gewünschten Bereich zu kopieren.

    Range(Bereich).Copy

  3. Setze eine Range Variable: Alternativ kannst du die Range auch direkt in eine Range-Variable setzen.

    Dim rngBereich As Range
Set rngBereich = Range(Range("A2").Value)
rngBereich.Copy

Häufige Fehler und Lösungen

  • Fehler: „Variable nicht definiert“ beim Verwenden von Range.

    • Lösung: Stelle sicher, dass du die Variable korrekt definiert hast, z.B. Dim Bereich As String.

  • Fehler: „Typenkonflikt“.

    • Lösung: Wenn du mit numerischen Werten arbeitest, verwende Dim BereichListe As Long anstelle eines Strings.

  • Fehler: Kopieren funktioniert nicht.

    • Lösung: Überprüfe, ob der Wert in der Zelle (z.B. A2) korrekt ist und einen gültigen Bereich darstellt.

Alternative Methoden

Es gibt verschiedene Möglichkeiten, mit Range Variablen in Excel VBA zu arbeiten:

  1. Direktes Arbeiten mit Variablen: Du kannst Range-Objekte direkt in Variablen speichern, was den Code leserlicher macht.

    Dim rngBereich As Range
Set rngBereich = Range("K10:K18")
rngBereich.Copy

  2. Verwendung von Resize: Mit der Resize-Methode kannst du den Bereich anpassen.

    Range("L" & BereichListe).Resize(9, 1).Value = Range("K10:K18").Value

Praktische Beispiele

Hier sind einige praktische Beispiele, um mit excel vba range variable zu arbeiten:

  1. Bereich kopieren und einfügen:

    Sub DatenAktu()
   Dim Bereich As String
   Bereich = Range("A2").Value
   Range(Bereich).Copy
   Range("Z1").PasteSpecial Paste:=xlPasteValues
End Sub

  2. Dynamisches Einfügen basierend auf einer anderen Zelle:

    Sub Test()
   Dim BereichListe As Long
   BereichListe = Range("B1").Value
   Range("K10:K18").Copy
   Range("L" & BereichListe).PasteSpecial Paste:=xlPasteValues
End Sub

Tipps für Profis

  • Verwende Option Explicit am Anfang Deiner Module, um sicherzustellen, dass alle Variablen deklariert sind.
  • Nutze With-Anweisungen, um Code zu optimieren und die Lesbarkeit zu verbessern: 
    With Range("K10:K18")
  .Copy
  .Offset(0, 1).PasteSpecial Paste:=xlPasteValues
End With
  • Überlege, die Application.CutCopyMode = False zu verwenden, um den Kopiermodus zu deaktivieren und die Zwischenablage zu leeren.

FAQ: Häufige Fragen

1. Wie definiere ich eine Range Variable in VBA?
Du kannst eine Range Variable mit Dim definieren, wie folgt:

Dim rng As Range
Set rng = Range("A1:A10")

2. Was ist der Unterschied zwischen String und Range in VBA?
Ein String ist ein Text, während ein Range-Objekt eine Referenz auf einen bestimmten Zellbereich in Excel darstellt.

3. Wie kann ich einen Bereich dynamisch anpassen?
Verwende die Resize-Methode, um die Größe deines Bereichs anzupassen, basierend auf anderen Zellen oder Variablen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige