代码中的关键部分是获取最后一行的行号，使用For循环遍历每一行，通过图片名称构建文件路径，检查文件是否存在，并确定图片插入的位置。如果文件存在，则使用Pictures.Insert方法插入图片，并通过With...EndWith语句调整图片大小和位置，使其与目标单元格对齐。代码中的na变量用于获取图片名称，wj变量用于构建图片路径，Cells(i，2).Select用于选择目标单元格，ActiveSheet.Pictures.Insert(wj)用于插入图片，WithSelection用于调整图片大小和位置。完成代码编写后，保存并关闭VBA编辑器，返回Excel工作表，运行宏。宏运行完成后，会弹出提示框，显示图片插入完成。此方法适用于需要批量插入图片并调整其位置的场景，提高了工作效率。