HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Entdecke rund 2 Millionen Excel-Lösungen im
Forumsarchiv
Forumbeitrag
Excel-Version des Fragestellers:
2010
Erfahrungslevel des Fragestellers:
Excel gut - VBA bescheiden
Werner
15.06.2026 18:40:13
Makro aus ein Klassenmodul ausführen
Guten Tag Fachleute,

ich habe ein Klassenmodul mit dem ich Klickereignisse von Labels ermittle.

Die ermittelte Label-Nr. wird in zwei Zelle auf dem Tabellenblatt gespeichert.

Danach sollen zwei Makros auf dem Tabellenblatt 3 ausgeführt werden.

Meine Kenntnisse reichen nicht aus, um das zu ermöglichen.

Option Explicit

Public WithEvents LabelEreignis As MSForms.Label

Public Sub LabelEreignis_Click()

' Gibt den Namen des gedrückten Labels aus
'MsgBox LabelEreignis.Name
'MsgBox Right(LabelEreignis.Name, Len(LabelEreignis.Name) - 5)

'einen Wert in Zelle schreiben ( für die Zell-Nr ).....
Worksheets(3).Range("Zell_Nr").Value = Right(LabelEreignis.Name, Len(LabelEreignis.Name) - 5)

'einen Wert in Zelle schreiben ( für die Label-Nr ).....
Worksheets(3).Range("Label_Nr").Value = Right(LabelEreignis.Name, Len(LabelEreignis.Name) - 5) + 15

ThisWorkbook.Worksheets("Tabelle3").Activate

'Label positionieren und einfärben.....
Application.Run Pos_Label

'Datenreihe erstellen bzw. bearbeiten.....
Application.Run Dial_Ein_Aus

End Sub

Evtl. gibt es unter Euch eine Fachperson, die mir behilflich sein kann!

Schöne Grüße
Werner

Als Antwort auf diesen Beitrag
Folgenachrichten
Antwort auf Beitrag erstellen
Bitte einen Anwendernamen ohne @ eingeben.
Bitte das Passwort eingeben.
Bitte eine gültige E-Mail-Adresse eingeben.
Bitte einen Betreff eingeben.
Weitere Optionen
Aktivieren, wenn die Frage/der Beitrag noch nicht beantwortet wurde und unter Listen > Offene Threads erscheinen soll.
Beispieldatei hochladen

Bitte einen Nachrichtentext eingeben.