ncssTblAlign Property

Returns or sets a String that represents the alignment of a given table.

expression.ncssTblAlign

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

The following example sets the alignment of a given table to right. The table will now appear aligned to the right-hand side of the page.

    Sub SetTableAlign()
   
    Dim objSs As IFPStyleState
    Dim objDoc As FPHTMLDocument
    Dim objRng As IHTMLTxtRange
    
    Set objDoc = Application.ActiveDocument
    
    objDoc.body.innerHTML = "<table><tr><td>Cell 1</td><td>Cell 2</td></tr></table>"
    Set objSs = objDoc.createStyleState
    Set objRng = objDoc.body.createTextRange
    
    objSs.gather objRng
    objSs.borderCollapse = True
    objSs.ncssTblAlign = "right"
    objSs.apply
               
End Sub