Excel批量插入图片失真时，可通过四种方法解决：一、勾选“锁定纵横比”后设精确尺寸；二、用VBA代码批量等比缩放；三、插入前用工具统一预处理图片尺寸；四、通过固定行列宽高并设置图片属性实现整齐显示。
如果您在Excel中批量插入图片后发现图片比例失真、拉伸或压缩，通常是因为Excel默认将图片按单元格尺寸拉伸填充，而非保持原始宽高比。以下是解决此问题并实现图片大小统一设置的多种方法：
一、使用“锁定纵横比”+“设置精确尺寸”法
该方法通过手动控制每张图片的缩放行为，在保持原始比例的前提下，统一设定高度或宽度，再让另一方向自动适配，避免变形。
1、选中已插入的第一张图片，右键选择【设置图片格式】。
2、在右侧窗格中展开【大小与属性】→【大小】，勾选“锁定纵横比”。
3、在【高度】框中输入目标值（如100磅），此时宽度将自动按比例调整；或输入【宽度】值，高度自动计算。
4、复制该图片格式：右键图片→【复制】，然后选中其他图片→右键→【选择性粘贴】→【图片（增强型图元文件）】或直接使用【格式刷】逐个应用。
二、利用VBA代码批量重设图片尺寸
适用于大量图片场景，脚本可遍历工作表所有图片，统一按指定高度（或宽度）等比缩放，确保每张图均不拉伸、不变形。
1、按
2、粘贴以下代码：
Sub ResizePicturesUniformly()
Dim shp As Shape
Dim targetHeight As Double
targetHeight = 100 '单位为磅，可修改为所需高度
For Each shp In ActiveSheet.Shapes
If shp.Type = msoPicture Then
shp.LockAspectRatio = msoTrue
shp.Height = targetHeight
End If
Next shp
End Sub
罗老师数据不上传 Excel VBA 本地处理专家 是一个面向企业隐私数据、本地化数据处理和 Excel 自动化的新手陪跑 skill。它不会要求用户上传原始表格，而是引导用户只提供表名、字段、规则和脱敏样例，再生成可复制到 Excel 里运行的 VBA 代码，帮助完成清洗、匹配、筛选、汇总、拆分和报表生成等任务。
3、关闭编辑器，返回Excel，按
三、插入前预处理图片为统一尺寸（推荐用于新插入）
在插入前使用外部工具（如Windows自带画图、Photoshop或在线批量处理器）将所有图片裁剪/缩放为相同像素尺寸，并统一保存为PNG格式，再通过“插入→图片”添加，可从根本上规避Excel自动拉伸问题。
1、将待插入图片全部放入同一文件夹。
2、使用IrfanView等支持批量操作的软件，执行【批处理】→【批量转换/重命名】。
3、勾选“调整图像大小”，设置固定宽度（如300像素）并勾选“保持纵横比”。
4、输出格式选PNG，点击【开始批处理】生成标准化图片集。
四、借助表格单元格控制图片显示区域
通过预先设定行高列宽，并将图片嵌入单元格内居中对齐，配合“将图片置于底层”和“随单元格改变位置和大小”选项，使图片在视觉上呈现整齐划一效果，且不因拖拽而失真。
1、选中目标列，右键【列宽】设为固定值（如50）；选中目标行，右键【行高】设为相同值（如60）。
2、插入图片后，右键→【大小和属性】→【属性】选项卡，选择“大小和位置随单元格而变”及“置于底层”。
3、再次右键图片→【设置图片格式】→【大小】中勾选“锁定纵横比”，再手动拖动任一角落调整至填满单元格且无白边。
