Guten Morgen zusammen,
Habe folgendes Problem:
In den Zellen K10:Y10 stehen verschiedene Werte (P, E, I oder eine 0) Möchte jetzt per Schleife diese Zellen durchgehen und für jedes mal, wenn ein P auftaucht die dementsprechende Beschriftung zu dieser Zelle in der Zeile darüber (also K9:Y9) in das Feld B10 eintragen. Treten mehrere P auf, wäre es natürlich super, wenn man die Beschriftungen aneinander reihen könnte.
Bin ziemlicher Anfänger und habe bisher lediglich folgendes:
Sub SpalteDurchlaufen()
Dim Zelle As Range
For Each Zelle In Range("K10:Y10" &
If Zelle = "P" Then
End If
Next
End Sub
Kann mir da jemand weiterhelfen? Wäre super!
Vielen Dank,
Anna-Lena :)
|