..2 Form

Open form from the previous example

In the XLSX Workbench, open form SHIPPING_LABELS from previous example and select root node in the form structure tree .

Insert Final post-processing VBScript - routine

Press button

It is placed on the Properties tab, in the "Final post-processing" item .

Code editor window will appears :

Insert below code into editor:

Sub Entry()

' add new worksheet

Set MySheet = XLWB_ActiveWorkbook.Sheets.Add

MySheet.Name = "TestVBScript"

' get table, which we have chosen from context and named T_LABELS

Set MyTable = XLWB_ActiveWorkbook.Container.Tables("T_LABELS").Table

' loop at table

For i = 1 To MyTable.Rows.Count

Set MyTableRow = MyTable.Rows(i)

MySheet.Cells(i, 1).Value = MyTableRow.Cell(1) 'Name

MySheet.Cells(i, 2).Value = MyTableRow.Cell(2) 'Street

MySheet.Cells(i, 3).Value = MyTableRow.Cell(3) 'Town

MySheet.Cells(i, 4).Value = MyTableRow.Cell(4) 'State

MySheet.Cells(i, 5).Value = MyTableRow.Cell(5) 'Zip

End Sub

Specify table to transfer from context to VBScript-routine

Press button

which is placed right from the previous. Popup screen with context tables (available for providing to routine) will appear. You should set checkbox for tables, which you want to provide to Final post-processing routine; you also should name tables (the name will be used for access to each table in the routine) .

Note 1: Only tables on top nesting level of context are available for choosing .

Note 2: Choose only tables consisting of simple fields (without nested tables and structures).

Let's choose the only available table and name it T_LABELS (with this name the table will be available in VBScript-routine):

Activate the Form by pressing a button

Form is ready to use now.

Page updated

Google Sites

Report abuse