<em>excel</em> 导入图片 不能取得类<em>picture</e

image的属性picture

按我的猜测，百你的“抄”的代码是属于“以前的代码”，这度种只适合于Office 97到2003。

而你用的，一定是Office 2007或更高版本的。
这些版本的图问片插入代码答跟之前的版本不同，完全是“不兼容”内的。
如果我没有猜错，我可以给容你提供在2007版本下，插入图片的代码。
假设所有需要显示的图复片都但在F:\图库\文件夹中，Excel中有一表中输制入了这些文件名(不含扩展名百)，要求：点度击工作表中文件名就显示图片问
1.插入image1控件
2.Alt+F11,将程序粘贴到本工作表模块中
Private
Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim strX As String
strX = "F:\图库\" & Selection.Value & ".jpg"
If Dir(strX) = "" Then
Image1.Picture = LoadPicture
Exit Sub
Else 　答
Image1.Picture = LoadPicture(strX)
End If 　
End Sub

Image1.Picture = loadpicture(strPath)