-vb excel 复制一行,vb打开excel

代码错误。因为图片知对象属于Shapes：

axlBook.Sheets("sheet1").Shapes.Range(Array("图片名")).Select'选中图片
Selection.Cut’剪切
axlBook.Sheets("sheet1").Range("3:3").Select‘定位，（用单道元格内做为定位参照，可以想像成取得单元格的坐标信息，是单元格所在的位置，而不是所在的单元格，是坐标值，是数，而不是单元格对容象。）
ActiveSheet.Paste‘粘贴

张志晨