Метод Application.EditGoTo (Project)

Прокрутка к ресурсу, задаче или дате.

Синтаксис

выражение. EditGoTo( _ID_, _Date_ )

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
ID	Необязательный	Long	Число, определяющее идентификационный номер задачи или ресурса для отображения в активной области.
Date	Необязательный	Variant	Число или строка, определяющая первую дату, отображаемую в активной области.

Возвращаемое значение

Boolean

Пример

В следующем примере пользователю предлагается ввести дату или название задачи, а затем выполнить прокрутку до этой даты или задачи в активной области. Предполагается, что пользователь находится в представлении задач.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.