Excel中所有图片大小调整方法并将插入图片在单元格居中代码

Excel中所有图片大小调整方法

1. 点击“插入”——“图片”。

   

2. 打开图片所在路径，选中多张图片，点击“插入”。

   

3. 看，这就插入了很多张图片。只是这些图片大小不一，很凌乱地堆放在一起。

   

4. 我们调整好其中一张图片的大小，点击图片，查看“格式”菜单下该图片的大小，记住该大小。

   

5. 点击一张图片，按“Ctrl + A”批量选中所有图片，在“格式”菜单中输入步骤4中的图片高度，最后按Enter键，所有图片就都调整成一样的高度啦。

   

6. 再次点击图片，按“Ctrl + A”批量选中所有图片，输入图片宽度，按Enter键之后，所有图片大小就一样啦。

   

7. 最后，将图片一张一张拖动到合适的位置上。

   

插入图片在单元格居中代码

 

目前excel的版本还无法支持将表格中的图片批量对齐居中,目前还有个办法可以玩成这样的操作。

步骤一:选中需要批量居中的图片(推荐随便选中一张图片,然后按住CTRL+A  即可全选表格中所有图片)

步骤二:按alt+F11,出现另外一个代码处理窗口,选中“插入-模块”

步骤三:在输入框中插入下列代码

Sub dq()

Dim shp As Shape

For Each shp In ActiveSheet.Shapes

shp.Left = (shp.TopLeftCell.Width - shp.Width) / 2 + shp.TopLeftCell.Left

shp.Top = (shp.TopLeftCell.Height - shp.Height) / 2 + shp.TopLeftCell.Top

Next

End Sub

步骤四:回到需要处理图片居中对齐的窗口

按住ALT +F8   执行宏dq 操作。(图片较多的话可能需要稍微等待一两分钟,之后所有被选中的图片就都整整齐齐的对齐啦。)

这样就大功告成啦!