Herbers Excel/VBA-Archiv
| Informationen und Beispiele zum Thema ListBox | |
|---|---|
 Screenshot zu ListBox |
ListBox-Seite mit Beispielarbeitsmappe aufrufen |
| Informationen und Beispiele zum Thema SpinButton | |
|---|---|
 Screenshot zu SpinButton |
SpinButton-Seite mit Beispielarbeitsmappe aufrufen |
Zellen mit Werten in Zeile nach Links verschieben
- Zellen mit Werten in Zeile nach Links verschieben von Lars vom 01.10.2003 14:54:40
- AW: Zellen mit Werten in Zeile nach Links verschieben - von Marc am 01.10.2003 15:20:50
- AW: Zellen mit Werten in Zeile nach Links verschieben - von Marc am 01.10.2003 15:20:50
 |
Betrifft: Zellen mit Werten in Zeile nach Links verschieben
von: Lars
Geschrieben am: 01.10.2003 14:54:40
Hilfe, ich habe eine Tabelle, in der z.B. die Spalte A immer gefüllt ist.
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
 |
Betrifft: AW: Zellen mit Werten in Zeile nach Links verschieben von: Marc
Geschrieben am: 01.10.2003 15:20:50
Hallo Lars,
das hier mal als Ansatz:
Sub links_schieben()
Dim w
For Each w In Range("A1:M20")
If IsEmpty(w) Then w.Delete Shift:=xlToLeft
Next w
End Sub
Du musst den Bereich noch anpassen und dieses Makro schiebt immer nur eine Zelle nach links, muss also ggfs öfter ausgeführt werden.
Aber in dem Stil könnte es gehen...
Grüsse,
Marc
| |