Dim shp As Shape ActiveSheet.Shapes.Range(Array("Picture 1")).Select'选择某一图片 ActiveSheet.Shapes.SelectAll'选择图片 Selection.ShapeRange.LockAspectRatio = msoFalse'取消图片纵横比锁定模式 Selection.ShapeRange.Height = 90'定义图片高度，可根据表格大小自定修改 Selection.ShapeRange.Width = 147’定义图片宽度，可根据表格大小自定修改 For Each shp In ActiveSheet.Shapes shp.Left = (shp.TopLeftCell.Width - shp.Width) / 2 + shp.TopLeftCell.Left'定义图片位置于所在单元格中间位置 shp.Top = (shp.TopLeftCell.Height - shp.Height) / 2 + shp.TopLeftCell.Top ’定义图片位置于所在单元格中间位置 End Sub Excel中将所有图片在单元格居中并固定大小1.本代码来源于博客内几位大佬代码并结合自己实际应用而成，分享给有相同工作需要的朋友2.效果展示3.宏代码Sub dq()Dim shp As ShapeActiveSheet.Shapes.Range(Array(“Picture 1”)).SelectActiveSheet.Shapes.SelectAllSelection.Shap... import java.io.FileInputStream; import java.io.FileOutputStream; import java.io.InputStream; import org.apache.poi.hssf.usermodel.HSSFClientAnchor; import org.apache.poi.hssf.usermodel.HSSFWorkbook; import org.apache.poi.ss.usermodel.*; public class Excel Image { public static void main(String[] args) throws Exception { // Load Excel file InputStream inp = new FileInputStream("test.xls"); Workbook workbook = new HSSFWorkbook(inp); Sheet sheet = workbook.getSheetAt(0); // Load image file InputStream imageInp = new FileInputStream("test.jpg"); byte[] imageBytes = new byte[imageInp.available()]; imageInp.read(imageBytes); // Add image to Excel sheet Drawing drawing = sheet.createDrawingPatriarch(); ClientAnchor anchor = new HSSFClientAnchor(0, 0, 0, 0, 3, 3, 4, 4); Picture picture = drawing.createPicture(anchor, workbook.addPicture(imageBytes, Workbook.PICTURE_TYPE_JPEG)); picture.resize(); // Save Excel file FileOutputStream fileOut = new FileOutputStream("test.xls"); workbook.write(fileOut); fileOut.close(); 在此示例中，我们首先加载 Excel 文件并获取第一个工作表。然后，我们加载图像文件并将其存储为字节数组。接下来，我们在工作表上创建一个绘图对象，并使用HSSFClientAnchor类创建一个 插入 点。 插入 点指定了图像应该 插入 的 单元格 位置和 大小 。然后，我们将图像添加到绘图对象中，并调用resize()方法将其调整为与 插入 点相同的 大小 。最后，我们将 Excel 文件保存到磁盘上。