Application.TaskDeliverableCreate method (Project)
Erstellt oder entfernt einen Lieferumfang für den ausgewählten Vorgang. Nur Project Professional.
Syntax
Ausdruck. TaskDeliverableCreate
( _Create_
)
Ausdruck Ein Ausdruck, der ein Application-Objekt zurückgibt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Create | Optional | Variant | Wenn der ausgewählte Vorgang kein zugeordnete Lieferumfang, True erstellt einen Lieferumfang. Wenn der ausgewählte Vorgang einen zugeordneten Lieferumfang, False entfernt den Lieferumfang zugeordnet ist. Der Standardwert ist False. |
Rückgabewert
Boolean
Bemerkungen
Wenn der ausgewählte Vorgang kein Lieferumfang zugeordnet, wurden die folgenden Ergebnisse der Ausführung der TaskDeliverableCreate -Methode:
TaskDeliverableCreate(True)
erstellt einen Lieferumfang für den ausgewählten Vorgang.Mit
TaskDeliverableCreate(False)
passiert nichts.
Wenn dem ausgewählten Vorgang jedoch eine zugeordnete Lieferumfang, folgenden sind die Ergebnisse der Ausführung der TaskDeliverableCreate -Methode:
TaskDeliverableCreate(True)
führt zur Fehlermeldung Es kann kein bereitstellbarer Link zum ausgewählten Teilprojektvorgang erstellt werden, gefolgt vom Laufzeitfehler 1004 ( Unerwarteter Methodenfehler).TaskDeliverableCreate(False)
entfernt den Lieferumfang.
Die TaskDeliverableCreate -Methode entspricht dem Befehl Lieferumfang erstellenLieferbestandteil-Dropdownmenü auf der Registerkarte Vorgang im Menüband. Wenn der ausgewählte Vorgang nicht Lieferumfang hat, der Befehl Lieferumfang erstellen wird erstellt. Wenn dem ausgewählten Vorgang jedoch ein Lieferumfang Erstellen Lieferumfang zeigt ein aktives Symbol, und wählen den Befehl den Lieferumfang löscht.
Hinweis
[!HINWEIS] Sie können nicht Erstellen einer Aufgabe Lieferumfang, bis Sie das Projekt veröffentlichen, und ein Project-Arbeitsbereichs erstellen. Sie können keinen Lieferumfang auch auf einem Sammelvorgang erstellen.
Beispiel
Im folgenden Beispiel wird für den ausgewählten Vorgang in einem veröffentlichten Projekt ein Lieferumfang erstellt oder gelöscht.
Sub ToggleDeliverable()
Dim deliverGuid As String
deliverGuid = ActiveCell.Task.deliverableGuid
If deliverGuid = "00000000-0000-0000-0000-000000000000" Then
TaskDeliverableCreate Create:=True
Else
TaskDeliverableCreate Create:=False
End If
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.