请问如何批量设置Excel打印缩放,并批量打印

由于是内网OA机器,wps无批量打印功能也无法联网更新,被一堆待打印表格逼疯了。如图没有批量打印功能
重庆
浏览 633
收藏
4
分享
4 +1
21
+1
全部评论 21
 
不会 截图下来弄到表里面印
· 河南省
回复
 
厉害
· 上海
回复
 
wils

创作者俱乐部成员

没有网络就自己写代码实现批量打印 需要详细的说明怎样缩放,怎样打印,举个例子吧
· 海南省
回复
wils

创作者俱乐部成员

比如吧这段代码存成bat,放到xlsx所在目录,运行,就是遍历所有xlsx,缩放300%,用默认打印机打印 问题是,平时手动选择的所有打印选项,都要改成代码,所以需要详细描述一个例子 #ANSI编码&cls&powershell -Version 5.1 -NoLogo -NoProfile -Command "gc -Encoding Oem -ReadCount 0 -LiteralPath '%~f0'|out-string|iex"&pause&exit/b $et = New-Object -ComObject ket.application dir *.xlsx | %{ $wb = $et.Workbooks.Open($_.FullName) $sht = $wb.ActiveSheet $sht.PageSetup.Zoom = 300 $sht.PrintOut() $wb.Close(0) } $et.Quit() [System.Runtime.InteropServices.Marshal]::ReleaseComObject($et)
· 海南省
回复