HasBorderVertical Property Example

This example causes the embedded chart data table to be displayed with an outline border and no cell borders.

With Worksheets(1).ChartObjects(1).Chart
    .HasDataTable = True
    With .DataTable
        .HasBorderHorizontal = False
        .HasBorderVertical = False
        .HasBorderOutline = True
    End With
End With