Hallo zusammen,
ich bastel an einem Programm für Pflegediagnosen.
In diesem kann ich über eine Userform in einer Listbox (Nr. 1) zu bestimmten "Aktivitäten des täglichen Lebens" Pflegediagnosen listen lassen. Wenn ich aus der Liste in Listbox 1 eine Pflegediagnose auswähle durch anklicken, werden weitere (nachrangige) Listboxen befüllt (mit möglichen passenden Ursachen z.B. oder mit passenden Pflegeinterventionen).
Das klappt auch alles prima. Ziel ist die Inhalte der Listboxen dann in einem bestimmten Format in eine Tabelle (1) zu übertragen, so dass man eine Pflegeplanung bekommt. Das klappt auch alles schon recht gut.
Jetzt möchte ich aber in die passende Zelle der Pflegeplanung (z.B. A1 bzw. eben die aktivierte) nicht nur die Pflegediagnose eintragen, sondern in die selbe Zelle auch die ausgewählten Ursachen. Wenn ich die Listbox mit den Ursachen auf Singlemode stelle, klappt das auch in folgender Weise problemlos:
ActiveCell.Value = ListBox1.Value & " [Ursachen:] " & ListBox2.Value
Listbox1 ist die Pflegediagnose, Listbox2 ist die Ursache. Problematisch wirds jetzt bei meinen bescheidenen VBA-Kenntnissen, wenn ich eine Multiauswahl für die Ursachen (also Listbox2) zulassen möchte. Dann weiß ich nicht wie das funktioniert. Nach meinem Verständnis müsste man dann eine Schleife integrieren (ListBox2.List(i) ) ... aber das bekomme ich nicht hin.
Könntet ihr mir helfen? Wie muss der Code aussehen, damit die Pflegediagnose und anschließend kommagetrennt alle ausgewählten Ursachen in ein und die selbe Zelle geschrieben werden.
Über eure Hilfe würde ich mich sehr freuen.
Beste Grüße
Sebastian