Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: via VBA Spalten nur bis zum letzen Wert markieren

via VBA Spalten nur bis zum letzen Wert markieren
Eddie
Guten Morgen,
ich weiß das die Frage bestimmt schon ein paar mal da war, aber ich finde irgendwie LEIDER nicht das was ich suche.
ICh will gerne das alle Zellen die Werte (also keine leerzellen) haben in Spalte H und I markiert werden.
Eigentlich ganz trivial, aber ich stell mich heute irgendwie blöd an.
Danke für eure Hilfe
Eddie
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
Markiere den Bereich H:I ...
11.04.2011 10:08:19
Matthias
Hallo
... dann F5 - Inhalte - Konstanten - ok
Gruß Matthias
AW: Markiere den Bereich H:I ...
11.04.2011 10:11:47
Eddie
ist nur suboptimal, aber trotzdem Danke, weil ich den Bereich wo ich die Daten markieren möchte auch einmal Leere Zellen habe, und danach wieder Zellen sind wo etwas steht, und somot wären halt NICHT alle Zellen in den Bereich markiert .... gibt es denn noch eine bessere Lösung ?
Anzeige
schon seltsam ...
11.04.2011 10:25:33
Matthias
Hallo
Zitat:
ICh will gerne das alle Zellen die Werte (also keine leerzellen) haben
und nun doch Leerzellen ? Was willst Du denn nun wirklich ?
Wenn Du den Bereich ("H:I") markierst also die kompletten 2 Spalten
und dann so vorgehst wie beschrieben, sind die Leerzellen dazwischen doch vollkommen egal.
Markiert werden dann die Nicht leeren Zellen.
Gruß Matthias
Anzeige
AW: schon seltsam ...
11.04.2011 10:32:27
Eddie
OK dann habe ich mich mal wieder zu kompliziert ausgedrückt .. SORRY :-)
Also ich habe z.B. bis zur Zeile 130 irgendwelche Daten stehen ... manchmal ist aber dort auch eine leere Zelle, die aber eigentlich EGAL ist !! nun will ich aber gerne, das ALLE Daten (auch die Leerzellen die darin vorhanden sind bis zum letzten wirklich realen Wert markiert werden ..
Danke und Gruß
Eddie
Anzeige
und darfs VBA sein ...
11.04.2011 10:54:06
Matthias
Hallo
Also eigentlich (sollten keine anderen Daten in der Tabelle sein ausser in (H:I)), reicht es so
gehe nach H1 und drücke Strg+Shift+Ende. Dann würde bis Ende (gefüllte Zelle in Spalte I) markiert werden
aber: Ich kenne Deine Datei nicht, deshalb kann man das nicht verallgemeinern.
also ... dann probiers mal so mit VBA:
Sub markiere()
Range("H1:I" & Columns("H:I").SpecialCells(11).Row).Select
End Sub
Gruß Matthias
Anzeige
AW: und darfs VBA sein ... DANKE
11.04.2011 11:03:09
Eddie
Danke klappt super .. habe aber auch in der zwischenzeit das gefunden

Range(Range("H1"), Range("I65536").End(xlUp)).Select

Das Problem war noch ganz woanders ... ich hatte eiegtnlich eun usedrange benutzt, um meine ganzen Daten zu markieren, aber irgendwie ist das ein Problem gewesen ... aber nun klappt alles SUPER und ich habe wieder etwas gelernt
DaNKE
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Spalten bis zum letzten Wert mit VBA markieren


Schritt-für-Schritt-Anleitung

  1. Öffne Excel und gehe zu dem Arbeitsblatt, in dem Du die Spalten markieren möchtest.

  2. Drücke Alt + F11, um den VBA-Editor zu öffnen.

  3. Füge ein neues Modul hinzu:

    • Rechtsklick auf "VBAProject (deineDatei.xlsx)" > Einfügen > Modul.
  4. Kopiere den folgenden VBA-Code in das Modul:

    Sub markiere()
       Range("H1:I" & Columns("H:I").SpecialCells(xlCellTypeLastCell).Row).Select
    End Sub
  5. Schließe den VBA-Editor und gehe zurück zu Excel.

  6. Führe das Makro aus:

    • Drücke Alt + F8, wähle „markiere“ und klicke auf „Ausführen“.

Jetzt sind alle Zellen in den Spalten H und I bis zum letzten Wert markiert! Diese Methode ist besonders nützlich, wenn Du sicherstellen möchtest, dass alle Zellen bis zum Ende der Tabelle markiert werden.


Häufige Fehler und Lösungen

  • Fehler: "Laufzeitfehler 1004"

    • Lösung: Stelle sicher, dass in den Spalten H und I tatsächlich Daten vorhanden sind. Wenn diese Spalten leer sind, kann die Funktion SpecialCells nicht ordnungsgemäß arbeiten.
  • Fehler: Nichts wird markiert

    • Lösung: Prüfe, ob Du den richtigen Bereich im Code angegeben hast. Der Code sollte die Spalten H und I ansprechen.

Alternative Methoden

  1. Shortcut-Methode:

    • Gehe in die Zelle H1 und drücke Strg + Shift + Ende. Dies markiert alle Zellen bis zum letzten gefüllten Wert in der Spalte.
  2. Mit Excel-Formeln:

    • Wenn Du nur eine spezielle Bedingung hast, kannst Du auch bedingte Formatierungen verwenden, um Zellen visuell hervorzuheben.

Praktische Beispiele

  • Beispiel 1: Wenn Du eine Liste in Spalte H und I hast, die bis zur Zeile 130 geht, aber einige Leerzellen dazwischen vorhanden sind, wird der oben genannte VBA-Code trotzdem alle relevanten Zellen bis zur letzten gefüllten Zelle markieren.

  • Beispiel 2: Du kannst die Methode auch auf andere Spalten anwenden, indem Du den Bereich im VBA-Code anpasst, z.B. Range("A1:B" & Columns("A:B").SpecialCells(xlCellTypeLastCell).Row).


Tipps für Profis

  • VBA optimieren: Wenn Du oft mit großen Datenmengen arbeitest, überlege, Deine Makros zu optimieren, um die Performance zu verbessern.

  • Makros speichern: Vergiss nicht, Deine Excel-Datei im Makro-fähigen Format (.xlsm) zu speichern, damit Du die VBA-Programmierungen nicht verlierst.

  • Verwendung von xlCellTypeLastCell: Diese Konstante ist nützlich, um sicherzustellen, dass Du die letzte Zellposition in der Tabelle korrekt ansteuern kannst.


FAQ: Häufige Fragen

1. Wie kann ich meine Auswahl auf eine einzelne Spalte beschränken? Du kannst den Bereich im VBA-Code anpassen, um nur eine Spalte zu markieren, z.B. Range("H1:H" & Columns("H").SpecialCells(xlCellTypeLastCell).Row).Select.

2. Gibt es eine Tastenkombination, um schnell bis zum Ende einer Spalte zu markieren? Ja, Du kannst Strg + Shift + Pfeil nach unten verwenden, um alle Zellen in einer Spalte bis zur letzten gefüllten Zelle zu markieren.

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