Application.EditGoTo method (Project)

Wechselt zu einer Ressource, einem Vorgang oder einem Datum.

Syntax

Ausdruck. EditGoTo( _ID_, _Date_ )

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
ID Optional Long Eine Zahl, die die Identifikationsnummer des Vorgangs oder der Ressource angibt, der bzw. die im aktiven Bereich angezeigt werden soll.
Date Optional Variant Eine Zahl oder eine Zeichenfolge, die das erste im aktiven Bereich anzuzeigende Datum angibt.

Rückgabewert

Boolean

Beispiel

Im folgenden Beispiel wird der Benutzer zur Eingabe eines Datums oder eines Vorgangsnamens aufgefordert und dann zu diesem Datum oder dieser Aufgabe im aktiven Bereich scrollen. Es wird davon ausgegangen, dass sich der Benutzer in einer Aufgabenansicht befindet.

Sub PromptUserForEditGotoArguments() 
 
 Dim Entry As String ' Date or task name entered by user 
 
 Entry = InputBox$("Enter a date or a task name to which you want to scroll in the active pane.") 
 
 ' If user enters a date, scroll to a date in the active pane. 
 If IsDate(Entry) Then 
 EditGoTo Date:=Entry 
 ' Otherwise, scroll to a task in the active pane. 
 Else 
 EditGoTo ID:=ActiveProject.Tasks(Entry).ID 
 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.