Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA - komplette Tabelle markieren

Forumthread: VBA - komplette Tabelle markieren

VBA - komplette Tabelle markieren
07.10.2021 10:02:08
honeybee
Ich suche nach einem VBA Code, mit dem ich eine variable Tabelle (Spalten- und Zeilenanzahl variieren), beginnend mit der Zelle "A2" bis an das Ende der Tabelle markiere und der Tabelle den Namen "Testtabelle" zuordne.
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - komplette Tabelle markieren
07.10.2021 11:17:51
GerdL
Moin Günther!
Ich bin überrascht.
Dein pauschaler Hinweis auf die Machbarkeit mit Power-Query fehlt.
Gruß Gerd
AW: VBA - komplette Tabelle markieren
07.10.2021 11:20:56
Günther
Na ja Gerd,
VBA und PQ sind ja im besten Fall Stiefgeschwister… ☺
 
Gruß
Günther  |  mein Excel-Blog
Anzeige
AW: VBA - komplette Tabelle markieren
07.10.2021 11:26:43
migre
Hallo!
Bspw. so:

Sub a()
With ThisWorkbook
.Names.Add Name:="nTestor", _
RefersToR1C1:=Range(ActiveSheet.Range("A2").CurrentRegion.Address(external:=True))
End With
End Sub
Vom aktiven Blatt aus aufgerufen.
LG Michael
;
Anzeige
Anzeige

Infobox / Tutorial

VBA für die komplette Tabelle markieren in Excel


Schritt-für-Schritt-Anleitung

Um eine komplette Tabelle in Excel mit VBA zu markieren, kannst du folgende Schritte durchführen:

  1. Öffne den VBA-Editor: Drücke ALT + F11.

  2. Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)" und wähle Einfügen > Modul.

  3. Gib den folgenden Code ein:

    Sub GanzeTabelleMarkieren()
       With ThisWorkbook
           .Names.Add Name:="Testtabelle", _
           RefersToR1C1:=Range(ActiveSheet.Range("A2").CurrentRegion.Address(external:=True))
       End With
    End Sub
  4. Führe das Makro aus: Schließe den Editor und drücke ALT + F8, wähle GanzeTabelleMarkieren und klicke auf Ausführen.

Dieser Code markiert die gesamte Tabelle, beginnend mit der Zelle "A2", und weist ihr den Namen "Testtabelle" zu.


Häufige Fehler und Lösungen

  • Fehler: "Die angegebene Zelle ist ungültig"

    • Lösung: Stelle sicher, dass die Zelle "A2" tatsächlich existiert und Daten enthält.
  • Fehler: "Objektvariable nicht festgelegt"

    • Lösung: Überprüfe, ob das aktive Blatt korrekt ausgewählt ist, bevor du das Makro ausführst.

Alternative Methoden

Falls du keine VBA-Lösungen verwenden möchtest, kannst du auch die folgenden Methoden in Excel ausprobieren:

  • Tastenkombination verwenden: Drücke STRG + A, um den gesamten Bereich der Tabelle zu markieren, wenn die aktive Zelle innerhalb der Tabelle ist.
  • Power Query nutzen: Mit Power Query kannst du Daten aus einer Tabelle importieren und dabei die gesamte Datenmenge verwalten.

Praktische Beispiele

Hier sind einige Beispiele, wie du die komplette Tabelle markieren kannst:

  1. VBA-Code zur gesamten Tabelle markieren:

    Sub TabelleMarkieren()
       Dim rng As Range
       Set rng = ActiveSheet.Range("A2").CurrentRegion
       rng.Select
    End Sub
  2. Namen einer Tabelle ändern:

    Wenn du bereits eine Tabelle hast und deren Namen ändern möchtest, kannst du dies mit folgendem Code tun:

    Sub TabelleUmbenennen()
       ActiveSheet.ListObjects(1).Name = "NeueTabelle"
    End Sub

Tipps für Profis

  • Verwende Option Explicit am Anfang deiner Module, um sicherzustellen, dass alle Variablen deklariert sind.
  • Schreibe Kommentare in deinen VBA-Codes, um die Lesbarkeit und Wartbarkeit zu verbessern.
  • Nutze den Makrorecorder, um schnell VBA-Code zu generieren, den du dann anpassen kannst.

FAQ: Häufige Fragen

1. Was ist der Unterschied zwischen CurrentRegion und UsedRange?
CurrentRegion bezieht sich auf den zusammenhängenden Datenbereich um eine bestimmte Zelle, während UsedRange den gesamten verwendeten Bereich des Blattes beschreibt.

2. Wie kann ich ein Makro für eine bestimmte Excel-Version anpassen?
Achte darauf, dass die verwendeten Befehle und Objekte in der Zielversion von Excel unterstützt werden. Teste den Code in der jeweiligen Version, um sicherzustellen, dass er funktioniert.

Beliebteste Forumthreads (12 Monate)

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