寻找VBA代码插入随机数到Wps文件表。

如果还有问题，请再打电话给我。

子插件()

尺寸x1，x2，x3，x4

x 1 = Format(Int(11 * Rnd-5)，"+0；-0;0;@")

x2 = Round(3 * Rnd - 1，1)

x3 =圆形(Abs(x1 - x2)，1)

x4 =格式(x1 * x2，"+0.0；-0.0;0;@")

将表格调暗为表格

设置table = ThisDocument。Tables.Add(选择。范围，2，2)

带表

如果。样式为“网格类型”

。Style = "网格类型"

如果…就会结束

。单元格(1，1)，Range.InsertAfter在x1之后

。单元格(1，2)。range . insert在x2之后

。单元格(2，1). range . insert在x3之后

。单元格(2，2). range . insert在x4之后

以…结尾

末端接头