Layout3DHistograms.SurfaceContourDisplay

SVB Example

Customizing a 3D histogram:

Option Base 1
Sub Main
    'sets the number of cuts for the y axis for the surface contour

    Dim Layout3DHisto As Layout3DHistograms
    'sets the object Layout3DHisto to the content of the active graph
    Set Layout3DHisto = ActiveGraph.Content

    'sets the contour plot type to Contour Lines
    Layout3DHisto.ContourPlotType =scgContourLines

    'sets the contour display property to true
    Layout3DHisto.SurfaceContourDisplay = True

    'sets the number of surface cuts for the y axis surface to 25
    Layout3DHisto.SurfaceYCuts = 25

    'sets the number of surface cuts for the x axis surface to 25
    Layout3DHisto.SurfaceXCuts = 25
End Sub