摘要：1 Sub PrintAll() 2 Dim s As Worksheet 3 For Each s In ActiveWorkbook.Worksheets 4 s.PrintOut 5 Next 6 End Sub 1.Office Excel 选择开发工具->选中项目->添加模块 添加如上代码 阅读全文

摘要：1 #region getThumImage 生成缩略图 2 /// <summary> 3 /// 生成缩略图 4 /// </summary> 5 /// <param name="sourceFile">原始图片文件</param> 6 /// <param name="quality">质量 阅读全文