Application.BoxCellLayout method (Project)

Sets the cell layout and size properties for a data template in the Network Diagram view. The initial layout of a new data template is 2 rows by 2 columns of 100% width cells with cell merging enabled.


expression. BoxCellLayout( _Name_, _CellRows_, _CellColumns_, _CellWidth_, _MergeCells_ )

expression A variable that represents an Application object.


Name Required/Optional Data type Description
Name Required String String. The name of the data template to edit.
CellRows Optional Long A value from 1 through 4 that specifies the number of rows of cells in the data template.
CellColumns Optional Long A value from 1 through 4 that specifies the number of columns of cells in the data template.
CellWidth Optional Integer A value from 100 through 200 that specifies the percentage by which to enlarge the width of the template cells.
MergeCells Optional Boolean True if blank cells are merged with the cell to the left.

Return value



Using the BoxCellLayout method with only the Name argument specified has no effect.


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 purple-blue color.

Sub ModifyCriticalDataTemplate() 
 Application.BoxCellLayout Name:="Test Critical", CellRows:=3, MergeCells:=True 
 Application.BoxCellEditEx Name:="Test Critical", Cell:=pjCell4_3, _ 
 FieldName:=PjField.pjTaskActualCost, Font:="Arial", FontSize:="8", FontColor:=&HFF0077, _ 
 Bold:=False, Italic:=False, Underline:=False, HorizontalAlignment:=pjLeft, _ 
 VerticalAlignment:=pjMiddle, TextLineLimit:=1, ShowLabel:=True, Label:="Cost" 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.