Die restlichen Spalten sind mal leer mal gefüllt.
Ein Makro soll nun den Inhalt der Zeile (Zelle für Zelle) immer ganz nach links verschieben bis der Inhalt immer in den Spalten von A aufwärts steht.
Wie geht das ?
Vielen Dank Lars
Sub links_schieben()
Dim w
For Each w In Range("A1:M20")
If IsEmpty(w) Then w.Delete Shift:=xlToLeft
Next w
End Sub
Um Zellen mit Werten in einer Zeile nach links zu verschieben, kannst Du ein einfaches VBA-Makro verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:
Öffne Excel und drücke ALT + F11
, um den VBA-Editor zu öffnen.
Klicke auf Einfügen
und wähle Modul
, um ein neues Modul zu erstellen.
Kopiere den folgenden Code in das Modul:
Sub links_schieben()
Dim w
For Each w In Range("A1:M20")
If IsEmpty(w) Then w.Delete Shift:=xlToLeft
Next w
End Sub
Passe den Bereich A1:M20
an Deine spezifischen Anforderungen an.
Schließe den VBA-Editor und gehe zurück zu Excel.
Führe das Makro aus, indem Du ALT + F8
drückst, das Makro auswählst und auf Ausführen
klickst.
Dieses Makro entfernt leere Zellen und verschiebt die Inhalte in der Zeile nach links. Es ist wichtig zu beachten, dass Du das Makro möglicherweise mehrmals ausführen musst, um alle leeren Zellen zu löschen und die Werte vollständig nach links zu verschieben.
Wenn Du kein Makro verwenden möchtest, kannst Du auch die Funktion "Zellen löschen" nutzen:
Zellen löschen
.Nach links verschieben
.Diese Methode ist manuell, aber sehr effektiv, um leere Zellen zu löschen und die Inhalte nach links zu verschieben.
Angenommen, Du hast folgende Zeile in Excel:
A | B | C | D | E |
---|---|---|---|---|
1 | 2 | 3 |
Nach Ausführung des Makros oder der manuellen Methode würde die Zeile so aussehen:
A | B | C |
---|---|---|
1 | 2 | 3 |
excel leere zellen löschen nach links verschieben
in Kombination mit anderen Formeln verwenden kannst, um effizientere Lösungen für umfangreiche Datenbestände zu entwickeln.WorksheetFunction
-Klasse in VBA, um komplexere Manipulationen an Deinen Daten vorzunehmen.1. Wie kann ich das Makro auf einen größeren Bereich anwenden?
Du kannst den Bereich im Code anpassen, z.B. Range("A1:Z100")
, um mehr Zellen zu berücksichtigen.
2. Was passiert mit den Daten, wenn ich das Makro ausführe?
Alle leeren Zellen werden entfernt, und die Inhalte werden nach links verschoben. Stelle sicher, dass Du eine Sicherungskopie Deiner Daten hast, bevor Du das Makro ausführst.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen