How do I Center a Dynamic Table with script?

HCL Domino Domino Forum
1

Hello all - In the following code, I would like to center the dynamic table on the form. Is there a method for this or do I just use the left margin element?

Thanks

Pat

Dim tableColStyles(1 To 5) As NotesRichTextParagraphStyle

Dim i As Integer

'Setting the width of each column using the NotesRichTextParagraphStyle we created

For i = 1 To 5

	Set tableColStyles(i) = Session.CreateRichTextParagraphStyle

	tableColStyles(i).FirstLineLeftMargin = 0

	tableColStyles(i).LeftMargin = 0

	Select Case i

	Case 1

		tableColStyles(i).RightMargin = Ruler_One_Inch * 1 'Rule_One_Inch - constant

	Case 2

		tableColStyles(i).RightMargin = Ruler_One_Inch * .75

	Case 3

		tableColStyles(i).RightMargin = Ruler_One_Inch * .75

	Case 4

		tableColStyles(i).RightMargin = Ruler_One_Inch * .75

	Case 5

		tableColStyles(i).RightMargin = Ruler_One_Inch * .75

		tableColStyles(i).Alignment = Align_Right

	End Select

Next