ActiveControl für TextBox im MultiPage
Betrifft: ActiveControl für TextBox im MultiPage
von: Urmila
Geschrieben am: 17.11.2014 15:09:45
Hallo zusammen,
ich komme leider nicht weiter und hoffe ihr könnt mir behilflich sein...
Ich habe eine MultiPage, in diesem sind einige Textboxen.
Nun will ich wenn ich auf bestimmte TextBox (sind aber alle umbenannt) klicke oder mit Tab in die TextBox springe, soll eine MsgBox erscheinen. Folgenden Code habe ich zusammen gestellt doch es wird nie die TextBox erkannt sondern die MultiPage (also als MsgBox soll der Name des Textboxes erscheinen und nicht der von der MultiPage):
Private Sub TB_Biene_Enter()
MsgBox = Me.MultiPage.Pages(0).ActiveControl.Name
End Sub
Vielen Dank und LG
Urmila
Betrifft: AW: ActiveControl für TextBox im MultiPage
von: Crazy Tom
Geschrieben am: 17.11.2014 15:16:51
Hallo
in meinem Test geht es so
Private Sub TB_Biene_Enter()
MsgBox Me.MultiPage1.Pages(0).ActiveControl.Name
End Sub
MfG Tom
Betrifft: AW: ActiveControl für TextBox im MultiPage
von: Rudi Maintaire
Geschrieben am: 17.11.2014 15:21:22
Hallo,
funktioniert soweit bei mir
MsgBox = ????
Gruß
Rudi
Betrifft: AW: ActiveControl für TextBox im MultiPage
von: Urmila
Geschrieben am: 17.11.2014 21:55:34
Hallo zusammen,
sorry aber habe den Fehler soeben gefunden....die TextBoxen waren zwar in einem MultiSheet eingefügt, jedoch war da noc ein Frame (was auf die Größe skaliert war ohne Überschrift).
Habe diese dann so gelöst:
MsgBox Me.MultiPage1.Pages(0).ActiveControl.ActiveControl.Name
Vielen Dank und schöne Träume
Urmila
Beiträge aus den Excel-Beispielen zum Thema "ActiveControl für TextBox im MultiPage"
Screenshot zu MsgBox
Screenshot zu Frame
Screenshot zu Label
Screenshot zu MultiPage
Screenshot zu TextBox
