Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
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
1544to1548
1544to1548
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalten ab 2. Zeile ohne Inhalt ausblenden

Forumthread: Spalten ab 2. Zeile ohne Inhalt ausblenden

Spalten ab 2. Zeile ohne Inhalt ausblenden
14.03.2017 10:28:30
Lesepeter
Hallo,
ich komme leider nicht weiter, deshalb wende ich mich an euch.
Ich würde gerne alle leeren Spalten einer Tabelle ausblenden.
Die Tabelle hat Überschriften in der ersten Zeile, d.h. es soll immer ab der 2. Zeile geprüft werden, ob die Spalte ab dort leer ist. Wenn ja, soll die komplette Spalte ausgeblendet werden.
Könnt Ihr mir weiterhelfen?
Danke schon mal im Voraus für eure Hilfe
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalten ab 2. Zeile ohne Inhalt ausblenden
14.03.2017 13:16:09
Lesepeter
Danke funktioniert sehr gut!
Eine Frage habe ich allerdings noch:
In manchen Spalten (wieder ab der 2. Zeile) sind Leerzeichen vorhanden.
Kann man die Leerzeichen in diesen Spalten entweder entfernen oder diese ebenfalls ausblenden?
Anzeige
Zellen mit Leerzeichen sind leider nicht leer...
14.03.2017 13:30:08
Michael
Peter,
...d.h. im konkreten Fall zählen solche Zellen natürlich mit und die Spalten werden ggf. nicht ausgeblendet (weil eben Zellwerte [= Leerwerte] vorhanden sind).
Natürlich kannst Du prinzipiell Leerzeichen entfernen, indem Du auftretende Leerzeichen durch "Nichts" ersetzt (" " zu ""). Das geht ganz schnell mittels Suchen-und-Ersetzen (Strg + H). Es ist natürlich die Frage, wie Deine Daten grds. aussehen, denn mit der genannten Methode zerstörst Du Dir ggf. auch Textwerte, die auf das " " angewiesen sind, bspw.: "Lorem ipsum" zu "Loremipsum".
Da ich Deine Daten nicht kenne, kann ich dazu aber nichts sagen bzw. eine programmatische Vorgehensweise vorschlagen.
LG
Michael
Anzeige
AW: Zellen mit Leerzeichen sind leider nicht leer...
14.03.2017 14:13:00
Lesepeter
Die Funktion kenne ich. Allerdings würden, wie bereits vermutet, die alle anderen Daten zerstört werden.
Manuell funktioniert die Funktion "Suchen und Ersetzen" auch nicht, da zu viele Spalten vorhanden sind.
Könnte man eventuell den Reiter "Tabelle1" in "Tabelle2" kopieren,
in "Tabelle2" die Leerzeichen mit "Suchen und Ersetzen" entfernen,
dann die ausgeblendeten Spalten ermitteln
und zuletzt genau diese Spalten in Tabelle1 ausblenden?
Ist zwar etwas umständlich aber würde gehen, oder?
Anzeige
Warum einfach, wenn's kompliziert auch geht...
14.03.2017 15:24:34
Michael
Peter ;-)
Könnte man eventuell den Reiter "Tabelle1" in "Tabelle2" kopieren,
Ja, problemlos
in "Tabelle2" die Leerzeichen entfernen,
Ja, klar
dann die ausgeblendeten Spalten ermitteln und zuletzt genau diese Spalten in Tabelle1 ausblenden
Warum die Spalten ermitteln und in Blatt 1ausblenden? Wenn jetzt schon ein bereinigtes Blatt 2 vorliegt, warum blenden wir dann nicht dort gleich die Spalten entsprechend aus, ohne großes "Sammeln"...
Aber da Du meinen dezenten Hinweis zuvor nicht verstanden haben dürftest: Wenn Du mir ein Beispiel Deiner Tabelle, mit Dummy-Daten, aber von den Formaten, Strukturen etc. dem Original gleich, hier hochlädst, kann ich mir das ansehen und ggf. eine programmatische Vorgehensweise vorschlagen, die nicht umständlich ist...
Also: Bsp-Mappe mit Ausgangssituation und gewünschtem Ziel, alle Daten natürlich anonymisieren!
LG
Michael
Anzeige
Hmm...
14.03.2017 17:26:15
Michael
Hallo Peter,
...damit ist gar nicht soviel anzufangen, wie erhofft. Im Bsp. sind nur 5 Zellen falsch-leer (optisch leer, aber mit 2 bis 5 Leerzeichen gefüllt). Leider hast Du mir kein Muster angeboten, wie die Werte/Daten der gefüllten Zellen aussehen (nur "x") - somit kann ich leider keine Systematik ableiten, nach der die falsch-leeren Zellen bereinigt werden sollen/können. Nachdem Du schon gemeint hast, dass es zuviele Spalten betrifft, halte ich es nicht für sinnvoll alle Zellen des Gesamt-Bereichs abzuklappern und einzeln zu bereinigen; allerdings wüsste ich auch da noch keine Systematik.
Gibt's noch ein paar Infos von Deiner Seite? Ich bin evtl. aber heute schon weg, und morgen wieder im Forum.
LG
Michael
Anzeige
AW: Hmm...
15.03.2017 11:28:49
Lesepeter
Ich habe einige Inhalte in die Zellen eingefügt (das "x" und ein paar Leerzeichen). Als Kontrolle: In der letzten Spalte, in der ersten Zeile sind Leerzeichen.
Leider gibt es keine Systematik.
Gibt es eine Möglichkeit sich die ausgeblendeten Spalten per VBA ausgeben zu lassen und diese auf eine andere Tabelle zu übertragen?
Da wären wir zwar wieder beim komplizierten Lösungsweg, aber wenn es sonst keine Möglichkeit gibt...
Anzeige
Okay, dann...
15.03.2017 13:06:36
Michael
...so: https://www.herber.de/bbs/user/112204.xlsm
Das ist wieder Deine Bsp-Datei, starte einfach Makro "a" (im allg. Modul 1). Hast Du es Dir so vorgestellt?
Was mit den zwischengespeicherten Daten im Blatt 2 passieren soll, hast Du nicht angegeben; notfalls müsstest Du jetzt Blatt 2 manuell löschen.
Hier der Code nochmals separat:
Sub a()
Dim Wb As Workbook: Set Wb = ThisWorkbook
Dim WsQ As Worksheet: Set WsQ = Wb.Worksheets("Tabelle1")
Dim WsZ As Worksheet: Set WsZ = Wb.Worksheets("Tabelle2")
Dim r As Range, i&, Sp$, a
Application.ScreenUpdating = False
With WsQ
.UsedRange.Copy WsZ.Range("A1")
Application.CutCopyMode = False
End With
With WsZ
.UsedRange.Replace what:=" ", replacement:="", lookat:=xlPart
Set r = .Range(.Cells(1, 1), .Cells(1, 1).End(xlToRight))
For i = 1 To r.Cells.Count
If WorksheetFunction.CountA(.Range(.Cells(1, i), _
.Cells(.Rows.Count, i)))
Gib Bescheid!
LG
Michael
Anzeige
AW: Okay, dann...
15.03.2017 15:17:43
Lesepeter
Danke für deine Antwort!
Im Beispiel funktioniert es sehr gut.
Weißt du eventuell noch wie man das auf andere Tabellen übertragen kann - unabhängig vom Reiternamen "Tabelle1"?
Bei "Tabelle2" handelt es sich nur um eine Hilfstabelle, das heißt hier wäre es egal.
Na bitte, fast geschafft...
15.03.2017 15:57:06
Michael
Hallo!
Weißt du eventuell noch wie man das auf andere Tabellen übertragen kann - unabhängig vom Reiternamen "Tabelle1"?
Klar. Du musst den entsprechenden Blattnamen nur hier anpassen...
Dim WsQ As Worksheet: Set WsQ = Wb.Worksheets("Tabelle1")
...also anstatt "Tabelle1" eben den gewünschten Blattnamen.
Oder Du passt die genannte Zeile so an
Dim WsQ As Worksheet: Set WsQ = Wb.ActiveSheet
...dann bezieht sich das ganze auf das gerade aktive Blatt.
Bei "Tabelle2" handelt es sich nur um eine Hilfstabelle, das heißt hier wäre es egal.
Auch hier kannst Du, nach obigem Schema, natürlich genauso anpassen. Achtung: Die Blätter müssen aber bereits existieren, mein Code prüft das nicht und legt die Blätter daher nicht automatisch an.
LG
Michael
Anzeige
AW: Na bitte, fast geschafft...
16.03.2017 15:36:07
Lesepeter
Super jetzt geht es!
Vielen Dank für die Hilfe Michael!
;

Forumthreads zu verwandten Themen

Spalten aus über 400 excel files auslesen
marky

Hallo Excel Freaks !
Habe folgendes Problem.
Ich möchter über ein makro auf einen Ordner Zugreifen indem sich über 400 excel files befinden. Die excel files beinhalten nur ein Sheet wobei dieses den Namen des files hat (Also nicht Tabelle 1 oder Sheet 1 oder so).
Ich möchte dass das...
03.09.2008 21:44:41
Thread-ID: 1007240
5 Beiträge
Bereich auswählen auf Basis der Spaltennummern
Eberhard

Hallo zusammen :-)
Vielleicht kann mir jemand helfen.
Ein Anwender soll in einer Tabelle einen Eintrag auswählen, in dem er in irgendeiner Zeile der Tabelle eine Zelle auswählt.
Das Makro soll dann spaltenorientiert Zellen aus dieser Zeile markieren, aber zum Beispiel nur die Spalte...
10.09.2008 18:06:00
Thread-ID: 1008890
6 Beiträge
Werte aus 2 Spalten vergleichen??
stefan

Hallo,
ich habe in 2 Spalten Werte. Wie kann ich prüfen, ob die werte in der einen spalte enthalten sind. WEnn sie enthalten sind, soll in einer 3.spalte ein text ausgegeben werden.
wie mach ich das am besten?
danke euch?
13.03.2009 16:57:19
Thread-ID: 1059944
4 Beiträge
Array Splitten Transponse Ausgabe in 2 Spalten
chris

Hallo VBA experten,
ich habe eine frage und bitte um eure Hilfe.
Ich komme alleine nicht weiter:(
Ich habe eine Tabelle1. In Spalte 1 Stehen z.b Werte untereinander.
27>27
17>17
6>6
17>1
usw...
diese möchte ich gerne in ein Array übernehmen und da...
23.04.2009 10:44:32
Thread-ID: 1070604
10 Beiträge
Spezialfilter mit ausgewählten Spalten
Michi

Liebe Gemeinde,
eine Tabelle mit ca. 50 Spalten soll per Spezialfilter ausgelsen werden. Das ganze wird per Makro und Schalfläche ausgeführt.
Soweit ich das verstehe ist beim Spezilafilter aber nur die filterung von Splaten möglich, die direkt nebeneinander liegen. Ich hingegen möchte...
13.05.2009 17:14:31
Thread-ID: 1074880
7 Beiträge
Spalten zählen und ausblenden
Sophie

Hallo liebe Forum-Leser!
Ich versuche in Excel sowas ähnliches wie MS Project darzustellen (weil das so gewünscht wird, fragt aber nicht warum).
Durch Datumseingabe (für Anfang und Ende des Projekts) will ich nur den Zeitstrahl (in Kalendeswochen) darstellen, so dass man die einzelne Sc...
15.06.2009 19:17:19
Thread-ID: 1081675
9 Beiträge
Anzeige
kombinationen aus spalten bilden
gh

hallo zusammen,
gibt es bei excel eine möglichkeit aus spalte 1 und 2 oder 1, 2 und 3 kombinationen zu bilden?
vielen dank im voraus!
lg
25.09.2009 12:52:27
Thread-ID: 1105553
11 Beiträge
Datum aus 2 spalten filtern
Gregor

Hallo
Ich habe in Spalte M ein Datum "Ausführung Beginn" und in Spalte N ein Datum "Ausführung Ende". Wie kann ich für einen bestimmten Zeitraum alle Daten zwischen Ausrührung Beginn und Ausführung Ende filtern. Zb. alle Arbeiten die in der Zeit vom 1.11.10 und 31.11.10 ausgeführt werden bz...
18.11.2010 20:16:31
Thread-ID: 1187609
3 Beiträge
alle Kombinationen aus zwei Spalten ermitteln
Jockel

Hallo,
ich habe eine Tabelle mit zwei Spalten:
A_____________B______________
Beleg_________Code__________
125___________60____________
125___________40____________
122___________30____________
122___________30____________
usw.
Ich möchte nun per Makro ermitte...
25.01.2011 09:28:18
Thread-ID: 1197160
4 Beiträge
+/- Ausgabe aufgrund Folge von 2 Spalteneinträge
2

Hallo Excelianer,
habt Ihr eine Idee, wie ich die +/- Einträge automatisiert auf Basis der 2 Regelen darstellen kann.
Die Spalten F,G,H, sind lediglich Hilfsspalten.
Ich scheitere immer daran, wenn ich auf einen vorherigen Block schauen muss. In Regel 1 muss ich ja im selben Bereic...
13.05.2011 16:01:26
Thread-ID: 1213743
2 Beiträge
Anzeige
VB Auswertung 2er Spalten in 2 neue zusammenfassen
udo

Hallo Excel VB Profis ;
bräuchte bitte Hilfe bei einer Auswertung 2er Spalten die ohne doppelte Werte in 2 neuen Spalten zusammengefasst werden sollen ...
habe dazu eine Beispieltab. hochgeladen ... Die Datei https://www.herber.de/bbs/user/79906.xlsx wurde aus Datenschutzgründen gelös...
23.04.2012 01:34:20
Thread-ID: 1260566
8 Beiträge
Zahlen aus 2 Spalten in 1 Spalte auflisten
WalterK

Hallo,
ich suche im nachfolgenden Beispiel eine Formel ab F2: Es sollen die beiden Spalten A und D ab F2 untereinander aufgelistet werden.
Arbeitsblatt mit dem Namen 'Tabelle1' ABCDEFGH1Erste Nummernxy1xy2Zweite Nummern Alle Nummern  21000115 20001 10001&nb...
15.10.2012 13:30:40
Thread-ID: 1282082
7 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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