excel图片自动排版

选择这些图片后，选择“绘图”工具栏的“对齐与分布”——“横向分布”或“纵向分布”，还可以根据需要“水平居中”、“垂直居中”等按钮。如果要统一调整大小，可以在选择这些图片后，设置对象格式，设置高度和宽度。或者：先把行高调整到合适的宽度（刚好可以放下一张图片），然后用宏。同时按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码：Sub test()Dim xPic As ShapeDim i As Integeri = 1For Each xPic In ActiveSShapesIf xPType = 13 ThenxPLeft = Range("A" & i)LeftxPTop = Range("A" & i)Topi = i + 1End IfNextEnd Sub在此界面直接按F5运行此宏，所有图片的左上角依次与单元格A1、A2、A3、的左上角对齐。

vba，代码

按ctrl+a全选图片，点击格式，对齐，纵向分布，点击对齐，水平居中就可以了。具体步骤：1、可以全选图片在格式中进行批量排版。2、打开excel，选中单元格，点击格式，点击行高，将行高设置为150，点击确定。3、选中b2单元格，点击插入，图片，此设备，桌面，选中图片，点击插入。4、拉动图片的一角对图片进行缩小，将最上面的图片移动到最后的单元格中。5、按ctrl+a全选图片，点击格式，对齐，纵向分布，点击对齐，水平居中就可以了。