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 选择开发工具->选中项目->添加模块 添加如上代码。
2.WPS Excel 先安装 wps.vba.exe , 然后 选择开发工具->VB宏->选中项目->添加模块 添加如上代码。
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 选择开发工具->选中项目->添加模块 添加如上代码。
2.WPS Excel 先安装 wps.vba.exe , 然后 选择开发工具->VB宏->选中项目->添加模块 添加如上代码。