如何在 Excel 中自动将所有图片随单元格移动并调整大小?

ms excelmicrosoft technologiescomputers更新于 2024/10/3 14:36:17

我们很少需要在 Excel 中操作照片或图像，但从 Google 上关于此问题的搜索量来看，显然人们对了解更多操作方法很感兴趣。当您尝试在 Excel 中插入图像时，您可能注意到图像与 Excel 中的单元格不对齐。本教程将帮助您了解如何在 Excel 中自动将所有图片随单元格移动并调整大小。

自动将所有图片随单元格移动并调整大小

在这里，我们将首先创建一个 VBA 模块，然后运行它来完成我们的任务。让我们来看看一种使用单元格更改 Excel 中所有图像大小和位置的简单方法。我们将借助 VB.NET 应用程序来完成此过程，因为 Excel 无法直接完成此操作。

步骤 1

假设有一个 Excel 工作表，其中包含下图所示的一组图像。

现在，要打开 VBA 应用程序，请右键单击工作表名称，然后选择"查看代码"。然后点击"插入"，选择"模块"，并在文本框中输入以下程序，如下图所示。

示例

Sub MoveAndSizeWithCells()
   'Updated By Nirmal
   Dim xPic As Picture
   On Error Resume Next
   Application.ScreenUpdating = False
   For Each xPic In ActiveSheet.Pictures
      xPic.Placement = xlMoveAndSize
   Next
   Application.ScreenUpdating = True
End Sub