使用VBA在用户窗体上动态显示图片

文章预览

学习Excel技术，关注微信公众号： excelperfect 标签： VBA ， 用户窗体 本示例来自于 mrexcel.com 。主要为： 1. 用户窗体上有 3 个控件：一个组合框，一个文本框和一个图像控件。 2. 组合框中的数据来自于工作表中单元格区域数据，在其中选取值后，将相应内容填充到文本框和图像控件。 VLOOKUP 被用于在源数据中导航。 3. 图片从本地电脑中获取。 示例效果如下图 1 所示。 图 1 示例数据如下图 2 所示。 图 2 在该用户窗体中详细的代码如下： Private  Sub ComboBox1_Change() Dim img, ad$, f!, zf!  Me.TextBox1 = Evaluate( "=vlookup("   &   "" ""   & Me.ComboBox1.Value  &   "" ""   &  _      ",a2:c"   &  Split(Sheets( "sheet1" ).[a2].CurrentRegion.Address,  "$" )( 4 ) &   ",2)" )  ad = Evaluate( "=vlookup("   &   "" ""   &  Me.ComboBox1.Value  & "" ""   &  _      ",a2:c"   &  Split(Sheets( "sheet1" ).[a2].CurrentRegion ………………………………