Supportnet / Forum / Tabellenkalkulation
wenn zelle den wert "plz" hat, dann...hiiilfe!!!
Frage
wenn zelle den wert "plz" hat, dann soll die zelle darüber links neben die zelle mit "plz" verschoben werden.
kann mir da wer helfen?
vielen dank im voraus
ed
Antwort 1 von gorinth
Hi ed,
vielleicht hilft Dir das weiter:
wenn "plz" in B2 steht, dann schreibe in A2
=WENN(B2="plz";B1;"")
Das verschiebt zwar nicht wirklich den Inhalt der Zelle über "plz", aber zeigt ihn in der Zelle links davon an.
Grüße,
gorinth
vielleicht hilft Dir das weiter:
wenn "plz" in B2 steht, dann schreibe in A2
=WENN(B2="plz";B1;"")
Das verschiebt zwar nicht wirklich den Inhalt der Zelle über "plz", aber zeigt ihn in der Zelle links davon an.
Grüße,
gorinth
Antwort 2 von Event
Hallo
Ein kleines Makro:
Gruß
Ein kleines Makro:
Private Sub CommandButton1_Click()
Dim spalte%, zeile As Long
For zeile = 1 To Cells.SpecialCells(xlCellTypeLastCell).Column
For spalte = 1 To Cells.SpecialCells(xlCellTypeLastCell).Row
If Cells(spalte, zeile).Value = "plz" Then
Debug.Print spalte, zeile
Cells(spalte, zeile - 1).Value = Cells(spalte - 1, zeile).Value
Cells(spalte - 1, zeile).Value = ""
End If
Next
Next
End Sub
Gruß