Tag: imagelist

你如何从工作表中填充形状的图像列表？

我希望从工作表中创build一个包含图像和数据的TreeView（每行都有一个零件的名称，下一个上面的程序集和一个由用户填充的图标）。 我终于设法得到树视图正确填充，并包括来自外部来源的图像（基于来自各种来源的代码，只是我自己的一点点）。 设置图像列表并将其分配给树视图对我来说仍然是一个谜，但它的工作。 缺less的是从工作表中获取图片，并从图片列表中，而不是从外部来源（（使用iml.ListImages.Add 1, "img1", LoadPicture("C:\Temp\red.jpg") ）。我读了几十篇关于它的文章没有用，有几个地方提到，但是是一个deadend。另外我读过的另一个select涉及复制到剪贴板和粘贴到其他地方，但它涉及很多的代码，似乎超出我的能力，所以我还没有尝试过呢。 我可以使用Sheet1.Shapes(1)或类似的.Type （其结果是“13”）或.Name （例如返回“图片1”）或.TopLeftCell.Address （它返回“$ C $ 1”例如）等等。所以我知道我有权访问它们，并引用了正确的对象。 当我尝试使用iml.ListImages.Add 1, "img1", Sheet1.Shapes(1)我得到一个“无效图片”错误。 当我尝试使用iml.ListImages.Add 1, "img1", Sheet1.Shapes(1).Picture我得到一个“对象不支持此属性或方法”的错误。 当我尝试使用iml.ListImages.Add 1, "img1", Sheet1.Shapes(1).CopyPicture我得到一个“types不匹配”错误。 我不知道还有什么可以尝试的，还有其他什么地方看。 请帮忙。 编辑：所有这一切发生在一个用户窗体。