图片嵌入表格的例子

sky122

求一个导出图片嵌入表格的例子

你的猫

  

子程序名	返回值类型	公开	备 注
导出图片到Excel

DLL命令名	返回值类型	公开	备 注
(暂未填写DLL命令名)
DLL库文件名:
(未填写库文件名)
在DLL库中对应命令名:
(未填写命令名)
参数名	类 型	传址	数组	备 注
图片路径	文本型
Excel路径	文本型

.局部变量 Excel程序, 对象
.局部变量 工作簿, 对象
.局部变量 工作表, 对象
.局部变量 图片对象, 对象
' 创建Excel对象
Excel程序.创建 ("Excel.Application", )
Excel程序.写属性 ("Visible", 真) ' 可见模式（调试时可改为假）
' 添加工作簿
工作簿 = Excel程序.读对象型属性 ("Workbooks").对象型方法 ("Add")
工作表 = 工作簿.读对象型属性 ("Worksheets", 1)
' 插入图片到A1单元格
图片对象 = 工作表.读对象型属性 ("Shapes").对象型方法 ("AddPicture", 图片路径, 假, 真, 100, 100, 200, 200) ' 位置和大小可调
' 保存Excel文件
工作簿.方法 ("SaveAs", Excel路径)
工作簿.方法 ("Close", 假)
Excel程序.方法 ("Quit")

信息框 ("图片已导出到Excel：" + Excel路径, 0, )
.子程序结束
' 调用示例
导出图片到Excel ("C:\test.jpg", "C:\output.xlsx")

i支持库列表	支持库注释
eExcel2000	EXCEL2000支持库

.版本 2<br /> .支持库 eExcel2000<br /> <br /> .子程序 导出图片到Excel<br />     .参数 图片路径, 文本型<br />     .参数 Excel路径, 文本型<br /> <br />     .局部变量 Excel程序, 对象<br />     .局部变量 工作簿, 对象<br />     .局部变量 工作表, 对象<br />     .局部变量 图片对象, 对象<br /> <br />     ' 创建Excel对象<br />     Excel程序.创建 ("Excel.Application", )<br />     Excel程序.写属性 ("Visible", 真) ' 可见模式（调试时可改为假）<br /> <br />     ' 添加工作簿<br />     工作簿 = Excel程序.读对象型属性 ("Workbooks").对象型方法 ("Add")<br />     工作表 = 工作簿.读对象型属性 ("Worksheets", 1)<br /> <br />     ' 插入图片到A1单元格<br />     图片对象 = 工作表.读对象型属性 ("Shapes").对象型方法 ("AddPicture", 图片路径, 假, 真, 100, 100, 200, 200) ' 位置和大小可调<br /> <br />     ' 保存Excel文件<br />     工作簿.方法 ("SaveAs", Excel路径)<br />     工作簿.方法 ("Close", 假)<br />     Excel程序.方法 ("Quit")<br />     <br />     信息框 ("图片已导出到Excel：" + Excel路径, 0, )<br /> .子程序结束<br /> <br /> ' 调用示例<br /> 导出图片到Excel ("C:\test.jpg", "C:\output.xlsx")

Python实现（使用openpyxl库）

[Python] 纯文本查看 复制代码

from openpyxl import Workbook
from openpyxl.drawing.image import Image
import os

def export_image_to_excel(image_path, excel_path):
    """
    将图片嵌入Excel单元格
    :param image_path: 图片路径
    :param excel_path: 输出的Excel路径
    """
    # 检查图片是否存在
    if not os.path.exists(image_path):
        raise FileNotFoundError(f"图片文件不存在: {image_path}")

    # 创建Excel工作簿
    wb = Workbook()
    ws = wb.active
    ws.title = "图片工作表"

    # 加载图片并插入到A1单元格
    img = Image(image_path)
    img.width = 200  # 设置宽度（像素）
    img.height = 200 # 设置高度
    ws.add_image(img, 'A1')  # 锚定到A1单元格

    # 调整行高列宽
    ws.row_dimensions[1].height = 150  # 行高
    ws.column_dimensions['A'].width = 30  # 列宽（字符单位）

    # 保存文件
    wb.save(excel_path)
    print(f"图片已导出到Excel: {excel_path}")

# 调用示例
export_image_to_excel("test.jpg", "output.xlsx")

• 易语言：
  
  
  • 需确保系统安装了Office Excel
  • 如需保存为.xlsx格式，需改用eExcel2007支持库
    
    
• Python：
  • 安装依赖库：
    [backcolor=var(--ds-md-code-block-banner-wrap-background-color)][color=var(--dsr-text-2)]bash
    [color=var(--dsr-icon-fg-1)][color=var(--button-text-color)][backcolor=var(--ds-button-color)][color=var(--button-icon-color)]
    
    
    
    
    
    
    
    
    pip install openpyxl pillow
    
  • 支持图片格式：.jpg, .png, .bmp等
    
    
  
  

走一回

不知道这个能不能用，前些日子测试时能用的，
excel支持库写_添加图片（易自带的命令以磅为单位，对不齐，这是精准定位到单元格）_.e (844.33 KB, 下载次数: 0)

2025-5-28 15:52 上传

点击文件名下载附件