次の方法で共有


Application.MakeFieldEnterprise メソッド (Project)

ローカル ユーザー設定フィールドを、エンタープライズ ユーザー設定フィールドとして Project Server に追加します。

構文

MakeFieldEnterprise( _FieldID_, _FieldName_, _LookupTableName_ )

expressionApplication オブジェクトを 表す変数。

パラメーター

名前 必須 / オプション データ型 説明
FieldID 必須 長整数型 (Long) ローカル ユーザー設定フィールドの id 番号。 } 引数 FieldID を取得するのにには、 FieldNameToFieldConstant メソッドを使用します。
FieldName 必須 String 作成するエンタープライズ ユーザー設定フィールドの名前を指定します。
LookupTableName 省略可能 String 作成する参照テーブルの名前を指定します。 既定値は空の文字列 ("") です。

戻り値

ブール型 (Boolean)

注釈

MakeFieldEnterprise メソッドが正常に完了すると、Project に "フィールドが Project Server に正常に追加されました" というメッセージが表示されます。 プロジェクトのエンタープライズ フィールドを表示して使用するには、Project Professionalを終了して再起動する必要があります。

MakeFieldEnterprise メソッドは、 ユーザー設定フィールド] ダイアログ ボックスで エンタープライズへのフィールドの追加のコマンドに対応します。 メソッドは、Project Professional でのみ使用します。 Project Professional は Project Server に接続している必要があります。

To use the following example, create a local custom field, such as a task text custom field, named LocalWithLUT2Enterprise. Add a lookup table for the custom field that has some values.

Sub Local2Enterprise() 
 Dim localId As Long 
 localId = FieldNameToFieldConstant(FieldName:="LocalWithLUT2Enterprise") 
 
 MakeFieldEnterprise FieldID:=localId, FieldName:="NewTaskTextFromLocal", LookupTableName:="NewTaskTextLUTFromLocal" 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。