EditGoto Method

Scrolls to a resource, task, or date.

Syntax

*expression   *.EditGoto(ID, Date)

*expression   *     Optional. An expression that returns an Application object.

ID    Optional Long. A number that specifies the identification number of the task or resource to display in the active pane.

Date    Optional Variant. A number or string that specifies the first date to display in the active pane.

Example

The following example prompts the user for a date or a task name, and then scrolls to that date or task in the active pane. It assumes the user is in a task view.

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

Applies to | Application Object

See Also | Find Method | FindNext Method | FindPrevious Method | GotoNextOverallocation Method | Sort Method