ShowBordersShadingDialog Method
Displays the Borders and Shading dialog box and returns a String that represents the Cascading Style Sheet property settings for the borders and shading properties selected in the Borders and Shading dialog box. A value is returned when the users clicks OK. If the user clicks Cancel, an empty String is returned.
expression.ShowBordersShadingDialog(strCSSIn)
*expression * Required. An expression that returns one of the objects in the Applies To list.
strCSSIn Optional Variant. A String that represents the initial custom settings for the dialog box.
Example
The following example displays the Borders and Shading dialog box, and then sets the border style for the active element to the border settings returned.
Dim strCSS As String
Dim strCSSIn As String
strCSSIn = "border: 3 double #00FFFF"
strCSS = Application.ShowBordersShadingDialog(strCSSIn)
If strCSS <> "" Then ActiveDocument.activeElement _
.Style.Border = strCSS
Applies to | Application Object