var app = wps.WpsApplication()
var doc = app.ActiveDocument
var selection = app.Selection
for (let i = 0; i < 5; i++) {
let end = selection.Range.End
let table = doc.Tables.Add(doc.Range(end, end), 3, 4) //在光标处插入表格
selection.SetRange(table.Range.End, table.Range.End) //光标选中表格的末尾
selection.TypeText('\r\n') //插入换行
}
案例需求:
问题原因:
1. 当插入表格时,如果第二个表格的起始位置在第一个表格的末尾,则会发生合并情况 3. 当插入表格时,每次插入的位置开头Range.Start一致,则会发生表格重合现象
常见现象:
现象一. 合并
现象二. 重合
解决方案
插入表格之前插入换行符,并且每次插入的定位要准确
代码示例
var app = wps.WpsApplication() var doc = app.ActiveDocument var selection = app.Selection for (let i = 0; i < 5; i++) { let end = selection.Range.End let table = doc.Tables.Add(doc.Range(end, end), 3, 4) //在光标处插入表格 selection.SetRange(table.Range.End, table.Range.End) //光标选中表格的末尾 selection.TypeText('\r\n') //插入换行 }
效果截图:

📋 章节目录
案例需求: 问题原因: 常见现象: 现象一. 合并 现象二. 重合 解决方案 代码示例