Application.BoxCellEdit メソッド (Project)
[ネットワーク ダイアグラム] ビュー (PERT チャート) のデータ テンプレートの各セルのプロパティを設定します。
構文
式。 BoxCellEdit( _Name_, _Cell_, _FieldName_, _Font_, _FontSize_, _FontColor_, _Bold_, _Italic_, _Underline_, _HorizontalAlignment_, _VerticalAlignment_, _TextLineLimit_, _ShowLabel_, _Label_, _DateFormat_ )
expressionApplication オブジェクトを 表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| 名前 | 必須 | String | 編集するセルのあるデータ テンプレート名です。 |
| Cell | 必須 | 長整数型 (Long) | 編集するセルです。 使用できる定数は、 PjCell クラスの定数のいずれかです。 |
| FieldName | 省略可能 | 長整数型 (Long) | セルに表示するフィールド名です。 使用できる定数は、 PjField クラスの定数のいずれかです。 |
| Font | 省略可能 | String | フォントの名前。 |
| FontSize | 省略可能 | 整数型 (Integer) | フォント サイズをポイント単位で指定します。 |
| FontColor | 省略可能 | 長整数型 (Long) | フォントの色を指定します。 使用できる定数は、 PjColor クラスの定数のいずれかです。 |
| Bold | 省略可能 | ブール型 (Boolean) | True の 場合、フォントは太字です。それ以外の場合、 false を指定 します。 |
| Italic | 省略可能 | ブール型 (Boolean) | True の 場合、フォントが斜体にします。それ以外の場合、 false を指定 します。 |
| Underline | 省略可能 | ブール型 (Boolean) | True の 場合は、フォントに下線が引かれます。それ以外の場合、 false を指定 します。 |
| HorizontalAlignment | 省略可能 | 長整数型 (Long) | セル内の文字列の水平方向の位置を指定します。 使用できる定数は、 PjAlignment クラスの定数のいずれかです。 |
| VerticalAlignment | 省略可能 | 長整数型 (Long) | セル内の文字列の水平方向の位置を指定します。 使用できる定数は、 PjVerticalAlignment クラスの定数のいずれかです。 |
| TextLineLimit | 省略可能 | 長整数型 (Long) | セル内の文字列の最大行数を指定します。 使用できる値は、1、2、または 3 です。 |
| ShowLabel | 省略可能 | ブール型 (Boolean) | True の セルにラベルが表示されている場合それ以外の場合、 false を指定 します。 |
| Label | 省略可能 | String | セルのラベルを指定します。 |
| DateFormat | 省略可能 | 長整数型 (Long) | フィールド名 が日付フィールドである場合は、セルの日付の形式を指定します。 PjDateFormat 定数のいずれかをすることができます。 |
戻り値
ブール型 (Boolean)
注釈
Name 引数および Cell 引数のみを指定して BoxCellEdit メソッドを使用しても無効です。
テキストの色を RGB 値で指定できるデータ テンプレートのセルを編集するには、BoxCellEditEx メソッドを使用します。
例
The following example modifies a copy of the Critical data template named Test Critical. The macro removes the fourth row of cells and sets the fourth cell in the third row to show the Actual Cost field and label in a green color.
Sub ModifyCriticalDataTemplate()
Application.BoxCellLayout Name:="Test Critical", CellRows:=3, MergeCells:=True
Application.BoxCellEdit Name:="Test Critical", Cell:=pjCell4_3, _
FieldName:=PjField.pjTaskActualCost, Font:="Arial", FontSize:="8", FontColor:=PjColor.pjGreen, _
Bold:=False, Italic:=False, Underline:=False, HorizontalAlignment:=pjLeft, _
VerticalAlignment:=pjMiddle, TextLineLimit:=1, ShowLabel:=True, Label:="Cost"
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。