实用！表格工具批量布局图片

大家好！

为了给我家小公主找练习题强化训练，从网上找到了一些积木图片，如下图：

现在要将这些图片添加到Word中平均分布并排好，留出写“块数”填空的位置，达到下图的排版效果。

如果由你来排版，你会怎么做呢？

（静静思考中……）

下面来分享一下我的做法

新建文档，插入文档

PS：在【插入图片】对话框中，按【CTRL+A】可全选图片并批量插入到文档中。

批量调整图片大小

从网上搜索，有很多VBA代码

批量调整非常方便，这里给大家提供一个

Sub setpicsize() '设置图片大小

Dim n '图片个数

On Error Resume Next '忽略错误

For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 类型 图片

ActiveDocument.InlineShapes(n).Height = 5.5 * 28.35 '设置图片高度为 5.5cm （1cm等于28.35px）

ActiveDocument.InlineShapes(n).Width = 7.33 * 28.35 '设置图片宽度 7.33cm

Next n

End Sub

使用时只需要修改代码中的Height和Width后面数字就可以了

使用方法请自行搜索

这是调整后的效果

……

转换成表格

由于批量插入的图片之间没有分段

属于在同一段落

因此需要先在每个图片后面加一个段落符号

使用【查找和替换】可快速完成

可参考下图

替换后的效果是这样的

现在，选中所有的图片

依次单击【表格】-文本转换成表格

将列数指定为2

效果图

为生成的新表格添加新列、新行

输入标题行内容

设置对齐

……

大功告成后的效果：

你学会了么？

快来动手试试吧！