Resource.GetField メソッド (Project)
指定した、リソースのユーザー設定フィールドの値を取得します。
構文
式。 GetField
( _FieldID_
)
式Resource オブジェクトを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
FieldID | 必須 | 長整数型 (Long) | ローカルのユーザー設定フィールドは、リソース ユーザー設定フィールドの PjField 定数のいずれか。 エンタープライズ ユーザー設定のフィールド、フィールドの Id を取得するのに FieldNameToFieldConstant メソッドを使用します。 |
戻り値
String
例
次の使用例は、ユーザーが指定した、ローカル リソースのユーザー設定フィールドの値を表示します。
Sub DisplayField()
Dim Temp As String
Temp = InputBox$("Enter the name of the field you want to see:")
Temp = LCase(Temp)
Select Case Temp
Case "name"
MsgBox (ActiveCell.Resource.GetField(FieldID:=pjResourceName))
Case "initials"
MsgBox (ActiveCell.Resource.GetField(FieldID:=pjResourceInitials))
Case "standard rate"
MsgBox (ActiveCell.Resource.GetField(FieldID:=pjResourceStandardRate))
Case ""
End
Case Else
MsgBox "You entered an invalid field. Please try again."
End
End Select
End Sub
エンタープライズ リソースのユーザー設定フィールドを使用する例については、 SetField メソッドを参照してください。
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示