Application.EditGoTo メソッド (Project)
タスク、リソース、または日付にジャンプします。
構文
式。 EditGoTo
( _ID_
, _Date_
)
expressionApplication オブジェクトを 表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
ID | 省略可能 | 長整数型 (Long) | 作業中の枠に表示するタスクまたはリソースの ID 番号を示す数値を指定します。 |
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 のサポートおよびフィードバックを参照してください。