Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Fügt der angegebenen Shapes-Auflistung ein neues Shape-Objekt hinzu, das ein Webformularsteuerelement darstellt.
Syntax
Ausdruck verwendet werden. AddWebControl (Type, Left, Top, Width, Height, LaunchPropertiesWindow)
expression Eine Variable, die ein Shapes-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Typ | Erforderlich | PbWebControlType | Gibt den Typ des hinzuzufügenden Webformularsteuerelements an. Kann eine der PbWebControlType-Konstanten sein, die in der Microsoft Publisher-Typbibliothek deklariert sind. Ein Fehler tritt auf, wenn pbWebControlWebComponent verwendet wird. |
| Left | Erforderlich | Variant | Die Position des linken Randes des Shapes, das das Webformularsteuerelement darstellt. |
| Top | Erforderlich | Variant | Die Position des oberen Randes des Shapes, das das Webformularsteuerelement darstellt. |
| Width | Erforderlich | Variant | Die Breite des Shapes, das das Webformularsteuerelement darstellt. Dieser Parameter wird für Befehlsschaltflächen ignoriert. |
| Height | Erforderlich | Variant | Die Höhe des Shapes, das das Webformularsteuerelement darstellt. Dieser Parameter wird für Befehlsschaltflächen ignoriert. |
| LaunchPropertiesWindow | Optional | Boolean | Nicht unterstützt Der Standardwert ist False; wenn dieses Argument auf TRUE festgelegt ist, tritt ein Fehler auf. |
Rückgabewert
Form
Bemerkungen
Bei den Parametern Links, Oben, Breite und Höhe werden numerische Werte in Punkten ausgewertet. Zeichenfolgen können in allen von Microsoft Publisher unterstützten Einheiten vorliegen (z. B. "2,5 Zoll").
Beim Hinzufügen eines Hotspots zu einem Websteuerelement mithilfe der pbWebControlHotSpot-Konstante wird die URL durch die Hyperlinks-Eigenschaft angegeben.
Beachten Sie, dass die Shape.Fill -Eigenschaft, die ein FillFormat -Objekt zurückgibt, und die Shape.Line -Eigenschaft, die ein LineFormat -Objekt zurückgibt, von einer Form Hotspot zugegriffen werden können. Beim Versuch, Zugriff auf diese Eigenschaften von einer Form Hotspot wird ein Laufzeitfehler zurückgegeben.
Beispiel
Im folgenden Beispiel wird der ersten Seite der aktiven Publikation ein Kontrollkästchen-Steuerelement für ein Webformular hinzugefügt.
Dim shpCheckBox As Shape
Set shpCheckBox = ActiveDocument.Pages(1).Shapes.AddWebControl _
(Type:=pbWebControlCheckBox, _
Left:=216, Top:=216, _
Width:=18, Height:=18)
Im folgenden Beispiel werden einem Shape auf Seite 4 der aktiven Webpublikation Hot Spots hinzugefügt. Zuerst wird eine vierzackiger Stern AutoForm der Seite hinzugefügt. Als nächstes wird jedem Arm des Sterns ein Hotspot hinzugefügt, indem die AddWebControl-Methode mit einem Typ von pbWebControlHotspot verwendet wird. Schließlich wird jedem Hot Spot ein Link hinzugefügt, indem die Hyperlinks-Eigenschaft jedes Hot Spot-Shapes verwendet wird.
Dim theDoc As Document
Dim theStar As Shape
Dim theWC1 As Shape
Dim theWC2 As Shape
Dim theWC3 As Shape
Dim theWC4 As Shape
Set theDoc = ActiveDocument
Set theStar = theDoc.Pages(4).Shapes.AddShape _
(Type:=msoShape4pointStar, Left:=200, Top:=25, _
Width:=200, Height:=200)
With theDoc.Pages(4).Shapes
Set theWC1 = .AddWebControl(Type:=pbWebControlHotSpot, _
Left:=280, Top:=25, Width:=40, Height:=80)
With theWC1
.Hyperlink.Address = "https://www.contoso.com/page1.htm"
End With
Set theWC2 = .AddWebControl(Type:=pbWebControlHotSpot, _
Left:=320, Top:=105, Width:=80, Height:=40)
With theWC2
.Hyperlink.Address = "https://www.contoso.com/page2.htm"
End With
Set theWC3 = .AddWebControl(Type:=pbWebControlHotSpot, _
Left:=280, Top:=145, Width:=40, Height:=80)
With theWC3
.Hyperlink.Address = "https://www.contoso.com/page3.htm"
End With
Set theWC4 = .AddWebControl(Type:=pbWebControlHotSpot, _
Left:=200, Top:=105, Width:=80, Height:=40)
With theWC4
.Hyperlink.Address = "https://www.contoso.com/page4.htm"
End With
End With
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.