如何选中1个cell的图片？

[bluegenius]

在一个指定sheet指定cell里有用键盘上的printscreen的拷贝图片，我用vba选中这个cell
为什么还是选不中这个图片呀？用msgbox打印cell内容为空

代码如下:
Application.EnableEvents = False
Workbooks.Open Fil
Dim workSheetCnt As Integer
workSheetCnt = ActiveWorkbook.Sheets.Count - 1

For n = 2 To workSheetCnt
ActiveWorkbook.Sheets(n).Select
ActiveSheet.Cells(6, 10).Cut
ActiveSheet.PasteSpecial Format:="图 (JPEG)", Link:=False, DisplayAsIcon:= _
False
ActiveWorkbook.Close
Next n
ActiveWorkbook.Save
Application.EnableEvents = True

[bluegenius]

代码写错了，save应该在close前面

[meiZiNick]

不明LZ在说什么

[knowledge_Is_Life]

不会,帮顶

[UltraBejing]

接分是王道！