Thema Datum  Von Nutzer Rating
Antwort
Rot Checkboxen Variablen eines Frames in ein variables Array
 20.08.2015 15:30:12 Björn
NotSolved
20.08.2015 15:37:57 Björn
NotSolved

Ansicht des Beitrags:
Von:
Björn		 Datum:
20.08.2015 15:30:12		 Views:
1031		 Rating:
     
Antwort:
  Ja
Thema:
Checkboxen Variablen eines Frames in ein variables Array
Hallo zusammen, ich habe eine UserForm, die einen Frame mit 5 Checkboxen enthält. z.B. Checkbox (Peter), Checkbox (Hans), Checkbox (Ralf), Checkbox (Patrik) und Checkbox (Markus); die ich wie folgt abfrage. Public Sub CheckBox_Peter_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) If CheckBox_Peter.Value = True Then Peter = "Peter" If CheckBox_Peter.Value = True Then AnzahlNamen = AnzahlNamen + 1 Else AnzahlNamen = AnzahlNamen - 1 End Sub Public Sub CheckBox_Hans_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) If CheckBox_Hans.Value = True Then Hans = "Hans" If CheckBox_Hans.Value = True Then AnzahlNamen = AnzahlNamen + 1 Else AnzahlNamen = AnzahlNamen - 1 End Sub Public Sub CheckBox_Ralf_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) If CheckBox_Ralf.Value = True Then Ralf = "Ralf" If CheckBox_Ralf.Value = True Then AnzahlNamen = AnzahlNamen + 1 Else AnzahlNamen = AnzahlNamen - 1 End Sub Public Sub CheckBox_Patrik_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) If CheckBox_Patrik.Value = True Then Patrik = "Patrik" If CheckBox_Patrik.Value = True Then AnzahlNamen = AnzahlNamen + 1 Else AnzahlNamen = AnzahlNamen - 1 End Sub Public Sub CheckBox_Markus_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) If CheckBox_Markus.Value = True Then Markus= "Markus" If CheckBox_Markus.Value = True Then AnzahlNamen = AnzahlNamen + 1 Else AnzahlNamen = AnzahlNamen - 1 End Sub Jetzt würde ich gern ein Array (Länge je nach Anzahl der Namen) mit den Strings befüllen um dann einen Text ausgeben zu können wie z.B. Peter, Ralf und Markus fahren in den Urlaub. TextBox = "" & Array() & " fahren in den Urlaub." Die Kommas und das "und" müssten auch automatisch eingetragen werden. Daher habe ich mir gedacht, dass ich die Array Länge wie folgt angebe Array(AnzahlNamen-1+(AnzahlNamen-1)) um auch die Kommas und das "und" mit unter zu bringen und dann wie beim oben angegebenen Beispiel des Textes die Array Positionen befüllen Array(0)= " & Peter & " Array(1)= ", " Array(2)= " & Ralf & " Array(3)= " und " Array(4)= " & Markus & " ich checke nur nicht wie ich das realisieren kann. Bitte helft mir - ich bin noch im absoluten VBA Anfänger Stadium.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Checkboxen Variablen eines Frames in ein variables Array
 20.08.2015 15:30:12 Björn
NotSolved
20.08.2015 15:37:57 Björn
NotSolved