Hallo Zusammen,
ich bin relativ neu in VBA und versuche jetzt seit einiger Zeit ein Makro zu erstellen welches mir wie in der nachfolgenden Datei beispielhaft gezeigt, alle Namen der im Worksheet "Anwesenheit" mit 1 gekennzeichneten Personen automatisch in die jeweilige Teilnehmerzelle im Worksheet "Protokolle" kopiert. Am Besten noch mit Komma und Leerzeichen. Ich habe es zuerst über Formeln probiert allerdings war das weniger erfolgreich.
Momentan versuche ich die Anwesenheitsliste bis zur letzten ermittelten Zeile durchlaufen zu lassen und in der größten besetzten Spalte (da es ja immer das aktuellste Datum sein soll) die 1er Einträge abzugleichen. Jetzt hätte ich gerne, dass die Namen aller mit 1 markierten Teilnehmer hintereinander aufgereiht in einer Zelle neben der "Teilnehmer" Zelle im "Protokolle" Worksheet landen. Allerdings erhalt ich im ersten Schritt schon sehr viele Fehlermeldungen.
Kann mir jemand von euch weiterhelfen? Oder kennt jemand eine schlankere Lösung für mein Umsetzungsvorhaben? Falls ihr noch Nachfragen habt meldet euch einfach. Ansonsten schon einmal vielen Dank für jegliche Hilfsversuche ;)
Hier die Beispieldatei:
https://1drv.ms/x/s!AoGeBfSUKjOWgu1VZcBykEfKzqLabA?e=OFIQmq
|