第1个回答 2019-05-30
用宏你愿意吗?
先选中这些表格,右键,设置属性,选项,上下左右边距都设置为0cm。
同时按alt和f11进入宏界面,点菜单的插入,模块,粘贴如下代码:
sub
test()
dim
pic
as
inlineshape
for
each
pic
in
thisdocument.inlineshapes
if
pic.type
=
3
then
pic.lockaspectratio
=
msofalse
pic.width
=
pic.range.cells.width
pic.height
=
pic.range.cells.height
end
if
next
end
sub
在此界面直接按f5运行此宏,图片大小自动填充到整个表格。
这个可以将所有表格里的图片一次性填充好。