Метод 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 и обратная связь.