✔ TabControl suche geeignetes Event (VBA)

dignsag

dignsag

Erfahrenes Mitglied
Hallo,

ich habe ein TabControl und verschiedene TabPages.
Nun möchte ich das auf der z.B. 2. Seite meine ComboBox gefüllt wird wenn ich von der 1. Seite auf die 2. wechsle.
Was mir hierzu fehlt ist das passende Event. Change und Click funktionieren definitiv nicht!
Ein Event wie "Bei Fokus erhalt" gibt es leider nicht.

Mit einem Button die Seite zu wechseln hilft leider auch nicht, da ja nicht garantiert ist das der Benutzer wirklich den Button benutzt um auf die 2. Seite zu kommen.

Meine Ideen gehen langsam aus, ich brauche also eine Idee wie ich meine Funktion zum füllen der ComboBox auslöse, damit Sie beim wechseln der TabPage wirklich ausgelöst wird!

Wäre für Vorschläge seeehr dankbar.

Gruß

Dignsag
 
Hi,

du müßtest das doch über das Click-Ereignis lösen können:
Code: 
Private Sub TabStrip1_Click(ByVal Index As Long)
Select Case Index
    Case 0: blablabla
    Case 1: ComboBox füllen
End Select
End Sub

Du mußt nur aufpassen, da der Index bei 0 beginnt
 
Tja,

das dachte ich auch, in VB funktioniert das auch so.

Allerdings nicht in VBA, da steht das Klickevent für jegliche Oberfläche außer dem Tabkopf über den man die Tabpage aufruft. Auch für den eigentlichen gesamten Register gibt es kein wirklich passendes Event.

Leider!
 
Bei mir funktioniert das Change-Ereignis wunderbar (verwende Microsoft Forms 2.0 TabStrip):
Visual Basic: 
Private Sub TabStrip1_Change()
MsgBox "Aktuelle Seite: " & Me.TabStrip1.SelectedItem.Caption
End Sub
 
Shakie hat gesagt.:
Bei mir funktioniert das Change-Ereignis wunderbar (verwende Microsoft Forms 2.0 TabStrip):
vb Code:
  1. Private Sub TabStrip1_Change()
  2. MsgBox "Aktuelle Seite: " & Me.TabStrip1.SelectedItem.Caption
  3. End Sub
Zum Vergrößern anklicken....

Ok,

habs nochmal probiert. Allerdings musste ich umdisponieren. Das Change funktioniert zwar. Aber das Selected Item gibt es in VBA nicht *heul*

Danke trotzdem
 
Also,

wenns jemand interessiert, das SelectedItem wird hier (VBA) über Value als Long-Wert zurückgegeben. AAAAAAAAAAAAAAAARGH, da muss man mal drauf kommen.

Also wenn man das 3. Tab anwählt gibt Value den Wert 2 zurück! beim 4. Tab 3 usw.

Wir stellen fest...

Value ist allmächtig.

Gruß

Dignsag
 
Genau das hab ich gebraucht!! ;) Suche schon seit Tagen im Web nach einer möglichkeit die Registerblätter zu wechseln. Hab's zwar auch schon mit Value versucht, aber das war anfangs nichts! Bis jetzt! Eigentlich gar nicht schwer:

Code: 
'Wählt das 2. Registerblatt aus.
MultiPage1.Value = 1
 
Um antworten zu können musst du eingeloggt sein.

Neue Beiträge

Zurück