如何在PowerPoint中使用VBA实现图像自动裁剪？

我正尝试找到图像中颜色存在差异的区域，再将这部分区域从图像中裁剪掉。
有没有什么方法可以逐像素获取图像的颜色值？
参考PowerPoint VBA的PictureFormat相关方法后我认为暂时无法实现，而且目标图像是位图格式。
我知道有设置透明色的方法，但问题在于我需要将多个logo的宽高调整为统一尺寸，透明色功能并不会修改图片本身的实际尺寸。
如果有可行方法的话，我打算编写一个函数，识别图像与白色的分界位置，再分别从顶部、中部、底部进行裁剪。

示例图像：

方案1：PowerPoint VBA 实现（无需额外软件） #

通过调用Windows系统自带的GDI+接口即可实现逐像素读取，完全适配PowerPoint环境：

• 先在VBA模块中引入GDI+相关接口声明，将目标位图加载到内存
• 逐行扫描像素点，判断是否为白色（可设置容差，避免因图片压缩产生的浅灰色留白被误判为内容）
• 分别记录上下左右四个方向第一个非白色像素的坐标，即为裁剪边界
• 调用GDI+裁剪方法生成新图，替换原PPT中的图片对象后，再统一调整所有图片的宽高到目标尺寸即可

核心像素判断代码示例：

' 自定义白色判断逻辑，threshold为容差参数，数值越大可兼容的浅留白越多
Function IsWhitePixel(r As Byte, g As Byte, b As Byte, Optional threshold As Byte = 5) As Boolean
    IsWhitePixel = (r > 255 - threshold) And (g > 255 - threshold) And (b > 255 - threshold)
End Function

方案2：批量处理方案（适合多文件操作） #

如果不限制必须在PowerPoint内完成，用第三方图片处理库可以快速实现批量裁剪：

• 加载图片后直接读取像素数组的RGB值
• 遍历所有像素拿到非白区域的边界后调用裁剪方法
• 所有图片裁剪完成后统一调整到目标尺寸保存，再导入PPT即可

内容的提问来源于stack exchange，提问作者Joe