Angeben von Steuerelementtipptext für Steuerelemente

Das folgende Beispiel definiert die ControlTipText -Eigenschaft für drei Befehlsschaltflächen-Steuerelemente ( CommandButton ) und zwei Page -Objekte in einem Multiseiten-Steuerelement ( MultiPage ).

Hinweis Das Microsoft Forms 2.0 CommandButton-Steuerelement enthält die ControlTipText-Eigenschaft.

To use this example, copy this sample code to the Script Editor of a form. To run the code you need to open the form so the Open event will activate. Make sure that the form contains:

  • Ein MultiPage -Objekt mit der Bezeichnung "MultiPage1".

  • Drei CommandButton -Steuerelemente mit der Bezeichnung "CommandButton1" bis "CommandButton3".

Hinweis Für eine einzelne Seite einer MultiPage wird ControlTipText aktiviert, wenn das MultiPage-Steuerelement oder ein Steuerelement auf der aktuellen Seite des MultiPage-Elements den Fokus hat.

Sub Item_Open() 
 Set MultiPage1 = Item.GetInspector.ModifiedFormPages("P.2").MultiPage1 
 Set CommandButton1 = Item.GetInspector.ModifiedFormPages("P.2").CommandButton1 
 Set CommandButton2 = Item.GetInspector.ModifiedFormPages("P.2").CommandButton2 
 Set CommandButton3 = Item.GetInspector.ModifiedFormPages("P.2").CommandButton3 
 
 MultiPage1.Page1.ControlTipText = "Here in page 1" 
 MultiPage1.Page2.ControlTipText = "Now in page 2" 
 
 CommandButton1.ControlTipText = "And now here's" 
 CommandButton2.ControlTipText = "a tip from" 
 CommandButton3.ControlTipText = "your controls!" 
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.