NumberDown Property Example

This example displays the number of labels across and down the page for the first custom label in the CustomLabels collection.

numAcr = Application.MailingLabel.CustomLabels(1).NumberAcross
numDwn = Application.MailingLabel.CustomLabels(1).NumberDown
MsgBox Prompt:= "Number of labels across " & numAcr & vbCr _
    & "Number of labels down " & numDwn & vbCr , _
    Title:="Label Page Configuration"