模板生成：如何填充表格数据?

少侠请留步

版本：Bex5V3.6
问题描述：attachmentPC 控件的word模板生成，
如果有个表格，需要动态生成行，并且填充数据该怎么操作？

jishuang

参考 /UI2/demo/components/process/attachment/mainActivity.w模版填充

少侠请留步

jishuang 发表于 2017-4-12 16:40
参考 /UI2/demo/components/process/attachment/mainActivity.w模版填充

其实我想知道，怎么动态添加表格的行，和动态设置书签C:\Users\Vincent\Desktop\1123.png

jishuang

这个是vba标准的操作word,需要自己都网上查找

少侠请留步

bex5可以调用vba的函数并且传参数吗？

jishuang

/UI2/demo/components/process/attachment/mainActivity.w模版填充里面的实现就是vba操作的

少侠请留步

已解决，可以结帖！
通过vba操作转成js实现！


Model.prototype.attContOfficeLoaded = function(event) {
                //debugger;
                var data = this.comp("mainData");
                // 将需要填充的内容构造成一个JSON数据
                var detail = this.comp("detailData");
                var djson = "";
                detail.each(function(op){
                        var remark = op.row.val('REMARK')==undefined?""p.row.val('REMARK');
                        var collDate = op.row.val('COLL_DATE')==undefined?""p.row.val('COLL_DATE');
                        djson += '{"ITEM_NO":"'+op.row.val('ITEM_NO')+'"'
                        +',"COLL_TYPE_NAME":"'+op.row.val('COLL_TYPE_NAME')+'"'
                        +',"COLL_AMT":"'+op.row.val('COLL_AMT')+'"'
                        +"},";
                });
                djson = "["+djson.substring(0, djson.length-1)+"]";
                var p = {
                        "CONT_NAME" : data.getValue("CONT_NAME"),
                        "CONT_ISSG_PARTY" : data.getValue("CONT_ISSG_PARTY"),
                        "CONTRACTOR" : data.getValue("CONTRACTOR"),
                        "dt":djson
                };
               
                event.officeEditorContext.execute(function(params, officeEditor, ovObj) {
                        // 当前文档对象实例
                        var activeDocument = ovObj.ActiveDocument;
                         // 全局的选中对象实例
                        var selection = ovObj.ActiveDocument.Application.Selection;
                       
                        // 在officeEditor对话框的页面内获取officeViewer
                        // 遍历填充数据
                        $.each(params, function(k, v) {
                                if (k === "dt") {
                                        return true;
                            }
                                // 填充
                                ovObj.WriteWordBookmarkInfo(k, v);
                        });
                       
                        // 填充表格数据，获取word中的第二个表格
                        var table = activeDocument.Tables(2);
                        var o;
                        var obj = eval('(' + params.dt + ')');
                        for (o in obj) {
                            table.Rows.Last.Select();
                            selection.InsertRowsBelow(1);
                            selection.MoveRight(12); // tab 键功能，移至下一列
                            selection.TypeText(obj[o].ITEM_NO);
                            selection.MoveRight(12);
                            selection.TypeText(obj[o].COLL_TYPE_NAME);
                            selection.MoveRight(12);
                            selection.TypeText(obj[o].COLL_AMT);
                        }
                }, p);
        };