如何在vba的窗体Image图像控件中显示excel工作表中创建的图表?

在vba窗体中,Image图像控件可以显示图片。

Image 图像控件可以显示的图片类型有以下几种

  • *.bmp

  • *.cur
  • *.gif

  • *.ico

  • *.jpg

  • *.wmf

Image图像控件不仅可以显示图片,还可以修剪、缩放图片。

要在Image图像控件中显示图片,需要设置Image图像控件的Picture属性,同时需要使用LoadPicture函数将图片加载到Picture属性中。

LoadPicture函数的语法如下:

LoadPicture函数将返回一个IPictureDisp接口。

以下vba代码将本地C盘的abc.jpg图片加载到窗体名称为frm1的Image1图像控件中:

如果要将excel工作表中的创建的图表加载到Image1图像控件中,首先需要将excel工作表中的创建的图表导出为独立的图片文件,然后再用LoadPicture函数加载。

将excel工作表中的创建的图表导出为独立的图片文件,需要用到Chart对象的Export方法。

如下图所示,以下vba代码将基于第一个工作表的a1:b4单元格区域创建的柱形图加载到Image1图像控件中:

 

 

 

 





       

发表评论