请问Vfp将图片嵌入excel单元格怎样写，并加上超链接

https://bbs.bccn.net/viewthread.php?tid=497368&highlight=EXCEL%2B%CD%BC%C6%AC
是不是你要的结果

不是。图片是要嵌在单元格的，在Excel表里对图片右键，有一个选项嵌入单元格

直接写好像不行

mpicture="D:\2008nl\9.JPG"
myexcel=newobject("EXCEL.application")
WITH myexcel
    .visible=.t.
    .workbooks.add
    .Range("C3").select
    cellW = .ActiveCell.Width
    cellH = .ActiveCell.Height
    WITH .ActiveSheet.Pictures.Insert(mpicture)
        .Placement = 1
        WITH .ShapeRange
            .LockAspectRatio = 0
            .Width=cellw
            .Height=cellh
        ENDWITH
    ENDWITH
ENDWITH

谢了，这个操作，比以前好用一些，图片还是浮于单元格上面，跟平时插入图片到EXCEL表里区别不是太大，当你在这一行图片往后插入一单元格时，这个图片就会变形，拉伸到2个单元格这么大，鼠标可以拖走。 在EXCEL里 在图片上右键时，会有一个嵌入单元格，嵌入后，图片拖不走，对于各种操作，图片不变形不走位

你手工制作的文件发个上来

感谢。由于文件要发给人增加信息，在文件上增行会引起拉伸。左右是程序生成的会。右边是手工嵌入的不会

就是直接将图片嵌入要怎么写

你原来的是在WPS里，不是excel,已经是两个不同的软件啦

[此贴子已经被作者于2022-5-6 17:02编辑过]