Zugreifen auf eine Registerkarte in einem TabStrip-Steuerelement
Im folgenden Beispiel wird mit folgenden Methoden auf eine Registerkarte eines Register-Steuerelements ( TabStrip ) zugegriffen:
Verwenden der Tabs -Auflistung mit einem numerischen Index.
Verwenden des Namens der entsprechenden Registerkarte.
Verwenden der SelectedItem -Eigenschaft.
Kopieren Sie diesen Beispielcode in den Skript-Editor eines Formulars. Zum Ausführen des Codes müssen Sie das Formular öffnen, damit das Open -Ereignis für das Element aktiviert wird. Stellen Sie sicher, dass das Formular ein TabStrip -Objekt mit der Bezeichnung "TabStrip1" enthält.
Sub Item_Open()
Dim TabStrip1
Dim TabName
Set TabStrip1 = Item.GetInspector.ModifiedFormPages.Item("P.2").Controls("TabStrip1")
For i = 0 To TabStrip1.Count - 1
'Using index (numeric or string)
MsgBox "TabStrip1.Tabs(i).Caption = " & TabStrip1.Tabs(i).Caption
MsgBox "TabStrip1.Tabs.Item(i).Caption = " & TabStrip1.Tabs.Item(i).Caption
'Use Tab object without referring to Tabs collection
If i = 0 Then
MsgBox "TabStrip1.Tab1. Caption = " & TabStrip1.Tab1.Caption
ElseIf i = 1 Then
MsgBox "TabStrip1.Tab2. Caption = " & TabStrip1.Tab2.Caption
End If
'Use SelectedItem Property
TabStrip1.Value = i
MsgBox " TabStrip1.SelectedItem.Caption = " & TabStrip1.SelectedItem.Caption
Next
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für