Share via


Shape.Select-Methode (Project)

Wählt die Form aus.

Syntax

Ausdruck. Select(Replace)

Ausdruck Eine Variable, die ein Shape-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Replace Optional Variant True ersetzt die aktuelle Auswahl durch die neue Auswahl. False fügt der aktuellen Auswahl die neue Auswahl hinzu. Der Standardwert ist True.
Replace Optional Variant

Rückgabewert

Nothing

Beispiel

Im folgenden Beispiel werden drei Formen erstellt und dann jede Form ausgewählt. Da die zweite und dritte Auswahl der ersten Auswahl hinzugefügt wird, werden alle drei Formen ausgewählt (siehe Abbildung 1).

Sub SelectShapes()
    Dim theReport As Report
    Dim shp1 As shape
    Dim shp2 As shape
    Dim shp3 As shape
    Dim reportName As String
    
    reportName = "Select Report"
    
    Set theReport = ActiveProject.Reports.Add(reportName)
    Set shp1 = theReport.Shapes.AddShape(msoShapeActionButtonHelp, 20, 50, 20, 30)
    Set shp2 = theReport.Shapes.AddShape(msoShapeBalloon, 100, 50, 30, 50)
    Set shp3 = theReport.Shapes.AddShape(msoShapeWave, 140, 50, 30, 50)
            
    shp1.Select
    shp2.Select False
    shp3.Select False
End Sub

Abbildung 1: Verwenden der Select-Methode zum Hinzufügen zu einer Auswahl

Verwenden der Auswahlmethode zum Hinzufügen einer Auswahl

Siehe auch

Shape-Objekt

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.