批量命名不知道快捷的方法,用宏吧宏使用方法:
1.Alt+F11进入VBE2.菜单 插入-模块3.复制以下代码到光标处4.Alt+F11回到Excel,Alt+F8,选择ReNamePic执行。Sub ReNamePic()Dim Sht As WorksheetDim Pic As Shape On Error Resume Next For Each Sht In Sheets For Each Pic In Sht.Shapes If Pic.Type = msoPicture ThenPic.Name = Pic.TopLeftCell.Offset(0, 1).Text End If Next NextEnd Sub批量导出比较容易,将工作簿另存为 网页(*.htm;*html)然后到保存路径下找同名的文件夹,文件夹内就是所有的图片了。