Combobox Event aufrufen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Combobox Event aufrufen
von: Sasch S.
Geschrieben am: 27.11.2003 03:04:04

Guten Morgen,

kann ich per Makro das ComboBox-Event "Private Sub Combobox1_Change()"
einfügen und mit Anweisungen befüllen?

Für Hilfe wie ich sowas anstellen kann wäre ich sehr dankbar.

Gruß
Sascha

Bild


Betrifft: AW: Combobox Event aufrufen
von: Nepumuk
Geschrieben am: 27.11.2003 05:23:16

Morgen Sascha,
du kannst. So stellst du es an:

Option Explicit
Public Sub UserForm()
    With Workbooks("Testmappe.xls").VBProject.VBComponents("Userform1").CodeModule
        .InsertLines .CountOfLines + 2, "Private Sub ComboBox1_Change()"
        .InsertLines .CountOfLines + 1, "    Beep"
        .InsertLines .CountOfLines + 1, "End Sub"
    End With
End Sub


Code eingefügt mit: Excel Code Jeanie

Gruß
Nepumuk


Bild


Betrifft: AW: Combobox Event aufrufen
von: Sasch S.
Geschrieben am: 27.11.2003 05:40:13

Hallo Nepumuk,

vielen Dank für die schnelle Hilfe, scheint
mir als würdest Du niemals schlafen.

Gruß
Sascha


Bild

Beiträge aus den Excel-Beispielen zum Thema " Combobox Event aufrufen"