Thema Datum  Von Nutzer Rating
Antwort
28.08.2012 08:58:47 Moritz
NotSolved
Blau VBA-Code mit anderen Variablen kopieren
 29.08.2012 10:47:06 Holger
Solved

Ansicht des Beitrags:
Von:
Holger		 Datum:
29.08.2012 10:47:06		 Views:
754		 Rating:
     
Antwort:
 Nein
Thema:
VBA-Code mit anderen Variablen kopieren

Hallo Moritz,

verwende ein Klassenmodul, z.B.

In das Klassenmodul clsBtn (anlegen!):
Public WithEvents ChBox As MSForms.CheckBox

Private Sub ChBox_Change()
MsgBox ChBox.Name & " wurde angeklickt" 'Diesen Code musst du deiner Absicht natürlich anpassen. Ggf mit Select Case, wenn unterschiedlicher Code für die Checkboxen ablaufen soll
End Sub

'Inden Code UserForm (hier UserForm7):

Dim ChBox() As New clsBtn

Private Sub CommandButton1_Click()
Unload UserForm7
End Sub

Private Sub UserForm_initialize()
ReDim ChBox(0)
For i = 0 To UserForm7.Controls.Count - 1
    a = UserForm7.Controls(i).Name
    If TypeName(UserForm7.Controls(i)) = "CheckBox" Then
        ReDim Preserve ChBox(UBound(ChBox) + 1)
        Set ChBox(UBound(ChBox)).ChBox = UserForm7.Controls(i)
    End If
Next i
End Sub

 

Gruß
Holger

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
28.08.2012 08:58:47 Moritz
NotSolved
Blau VBA-Code mit anderen Variablen kopieren
 29.08.2012 10:47:06 Holger
Solved