naja, ein paar mehr Infos wären hilfreich (Excelversion, wo kommen die leeren Zellen her). Hast Du es schonmal mit dem Autofilter versucht? Du könntest auch nach Spalte A sortieren (ggf. Bereich erweitern wenn nebendran noch was steht).

Oder Du verwendest ein Makro:

Sub LeerzeilenLöschen()
Dim ze_zähler As Integer
Dim sp_zähler As Integer
Dim ZeileBehalten As Boolean
Dim zeilenende As Integer
Dim a As Range
Set a = ThisWorkbook.Worksheets(deinTabellenblatt).Range(deinBereich)
For ze_zähler = a.Rows.Count To 1 Step -1
ZeileBehalten = False
For sp_zähler = 1 To a.Columns.Count
If a.Cells(ze_zähler, sp_zähler) <> "" Then ZeileBehalten = True: Exit For
Next sp_zähler
If Not ZeileBehalten Then a.Rows(ze_zähler).Delete
Next ze_zähler
End Sub


Die fette Zeile muß noch angepaßt werden. Hier kommt der Eintrag für das Tabellenblatt (z.B. "Tabelle1") und die Adressierung für den Bereich der ganzen Tabelle.
Bsp: Set a = ThisWorkbook.Worksheets("Tabelle1").Range("A1:G200")

Vor dem Ausführen des Makros am besten die Originaltabelle noch mal sichern, da ein Rückgängigmachen nicht möglich ist.

greetz
taurus

OlliB schrieb:

Danke euch zweien, das Ihr euch meinen Problem angenommen habt.

kein Problem, haben wir gerne gemacht (da kann ich sicher für uns beide sprechen)

OlliB schrieb:

Aber ich bin Anfänger in Excel und weiß nicht wie man einen Auto-Filter einrichtet oder ein Makro einsetzt.

macht nix, dafür bist Du in einem Forum!

OlliB schrieb:

Schande :löl: für mich,aber ich kann andere Sachen dafür besser.

richtige Einstellung, aber keine Schande über Dich, jeder hat mal so angefangen
Deine Angaben helfen...

Lösung
Makro einbinden
Vorbereitung Code hier aus der Nachricht kopieren

Deine Excel Datei (die aus Word) ist geöffnet, jetzt drückst Du die Tasten Alt + F11 gleichzeitig; es öffnet sich der Visual-Basic-Editor

Im linken Fenster siehst Du oben einen kleinen Menübaum, drin steht Tabelle1, Tabelle2, Tabelle3... mit einem Rechtsklick auf "Tabelle1" (in der Deine Daten stehen nehme ich an) kannst Du über Einfügen --> Modul ein "neues Blatt" erzeugen

Jetzt klickst Du in das neue, rechte Fenster und fügst mit Strg + V den Code dort ein

Jetzt musst Du den Bereich: Set a = ThisWorkbook.Worksheets("Tabelle1").Range("A1:A9999 ") noch anpassen (nimm das Muster wie hier)

Oben rechts über das X das Fenster schließen und in der Excel Tabelle dann über Extras --> Makro --> Makros das Makrofenster aufrufen

Dort klickst Du dann auf LeerzeilenLöschen und anschließend auf Ausführen (Makro läuft eine kurze Zeit... keine Bange!!! Einfach laufen lassen!!!)

Autofilter
Wenn Deine Spalte A:A eine Überschrift hat, klicke in Zelle A1

Jetzt Daten --> Filter --> AutoFilter und aus der Zelle A1 wird ein Auswahlfeld (rechts der Pfeil nach unten)

Draufklicken und in diesem kleinen Fenster gaaaaanz nach unten scrollen. Dort gibt die Auswahl "Leere" anklicken. Jetzt dürften in Deiner Spalte A:A nur noch leere Zellen sein.

Vorne auf die Zeilennummer 2 klicken, linke Maustaste gedrückt halten und nach unten scrollen. Loslassen und mit der rechten Maustaste auf die jetzt blauen Zeilennummern klicken.

Etwa in der Mitte des Kontextmenü auf "Zeilen löschen" gehen - fertig

Sortieren
Markiere die Spalte A:A indem Du auf dei Spaltenüberschrift (das "A") drückst

dann auf Daten --> sortieren, im neuen Fenster alle Einstellungen lassen und auf "OK" - fertig

warum eigentlich so komplizert?

-komplette Tabelle markieren (auf die Ecke links neben Spalte A und über Zeile 1 klicken)
-Menü Daten > sortieren nach Spalte A (aufsteigend) evtl. Überschrift anklicken, falls vorhanden

-wenn in den Zeilen der unbeschrifteten A-Spalte was drin steht:
STRG + Cursor abwärts drücken (springt ans Ende der Liste)
-Zeile unterhalb markieren
-STRG + shift + Cursor abwärts drücken
-rechte Maustaste auf Zeilenbeschriftung
-Funktion "Zellen löschen"

Um wieder an den Anfang der Tabelle zu kommen, einfach STRG + Pos1 drücken

Das Ganze dauert ca. 10 Sekunden

feddisch

dark41836 schrieb:

warum eigentlich so komplizert?

Du Profispaßvogel!

1. Schau auf meinen Lösungsvorschlag 3 = Sortieren, im Prinzip das gleiche wie Du es beschrieben hast, nur nicht so kompliziert formuliert
2. So wie er die Sache beschreibt, ist das eine wiederkehrende Sache, ich persönlich würde mir das Makro in eine eigene Datei speichern und via Button hinterlegen, dann hab ich künftig nur noch einen Knopfdruck = noch schneller und einfacher
3. Ist das eine Auswahl der Möglichkeiten und kein unbedingt so machen müssen was weiß ich, was für ihn am Besten ist
4. Ist er Excel Noob und möchte vielleicht was lernen
5. Man kann alles einfach oder kompliziert machen

Also: Klappe nicht so weit aufreißen Du bist auch froh, wenn Du zu einem Problem mehrere Lösungen angeboten bekommst und wählen kannst oder!?

Ich auch, ich auch!

Hier ist die wahrscheinlich einfachste Lösung.

• Spalte A markieren
  
• Suchen (Strg+F)
  
• Feld leer lassen
  
• Auf Alle suchen klicken
  
• Mit Strg+A jede Zelle der unteren Suchliste auswählen
  
• Bearbeiten > Zelle löschen bzw. Start > Zellen > Löschen > Zellen löschen... > Ganze Zeile
  

Gruß

FeliX_22