Tabelle auswertung
20.11.2017 16:05:33
Achim
icj benötige eine VBA Routine um Felder in Abhängigkeit ob diese leer sind oder nicht zusammen zu fassen.
Ich möchte gerne in celle 5 alle werte aus den Zellen 1, 3, 4, 5 und 2 mit einem Sonderzeichen (z.B. #1 Zellenwert aus zelle1, #2 Zahlenwert aus zelle 3 usw.) jedoch nur wenn in den Zellen auch ein Inhalt ist, ansonsten nur #1 und Zellenwert und vieleicht #3 und Zellenwert.
Ich habe mir schon aus dem Internet eine Formel zusammengebaut welche auch schon teilweise funktiniert.
Sub a()
Dim i As Long
i = 1
Do Until Cells(i, 1).Value = ""
Cells(i, 5) = Cells(i, 1).Value & "#1" & Cells(i, 3).Value & "#2" & Cells(i, 4).Value & "#3" & _
_
Cells(i, 2).Value
i = i + 1
Loop
End Sub
Ich lege mal die Tabelle mit dem Code bei.
Ich hoffe einer hat eine Idee.
gruß Achim
Anzeige