非凡首页|软件资讯|最新更新|下载排行|软件分类|软件专题
您当前位置: 下载首页应用软件扫描打印打印excel强制页面纵向.exe

打印excel强制页面纵向.exe v2.75 扫描打印

  • 软件等级:4 stars.
  • 软件大小:14.87MB
  • 支持语言:简体中文
  • 授权方式:免费版
  • 软件分类:应用软件/扫描打印
  • 官网链接:
  • 更新时间:2024-03-18 06:00:02
  • 运行环境:WinAll
  • 厂商:
关 键 字: 打印工具
软件介绍 软件截图 软件专题 软件问答 相关文章 相关软件 下载地址

企业办公人员如果经常需要对文档进行打印操作,可以试试小编带来的这款打印excel强制页面纵向.exe软件,这是一个很实用的打印辅助工具,能够帮助用户将各种不同类型和格式的文件生成为纵向的效果,从而让文件实现纵向打印,满足用户的打印需求,只需一键即可转换。

软件功能

主要为快速的将文件夹内的PPT、EXCEL、WORD生成对应的PDF。

PS:印象中如不能转换好像需要安装有office,成品是写定了为纵向也可以改为横向或者不设置。

image.png

使用方法

打开Excel,//点击左上角的表格标志,点击打印,然后选择打印预览,//在打印预览里有个对页面横纵的设置,点击横向,//调整表格的大小,点击缩放比例,缩放调整到大小合适的比例,//接下来选择页面设置,点击页边距,居中方式点击水平和垂直,设置完成后整个表格就能居中了,然后就可以直接打印了。

代码说明

"""

【程序功能】:将【目标文件夹】内所有的 ppt、excel、word 均生成一份对应的 PDF 文件

【作者】:qzw,提供内部使用

【目标文件夹】:默认为此程序目前所在的文件夹;

若输入路径,则为该文件夹(只转换该层,不转换子文件夹下内容)

【生成的pdf名称】:原始名称+.pdf

"""

import os, win32com.client, gc

# Word

def word2Pdf(filePath, words):

# 如果没有文件则提示后直接退出

if(len(words)<1):

print (" 【无 Word 文件】 ")

return

# 开始转换

print (" 【开始 Word -> PDF 转换】")

try:

print ("打开 Word 进程...")

word = win32com.client.Dispatch("Word.Application")

word.Visible = 0

word.DisplayAlerts = False

doc = None

for i in range(len(words)):

print(i)

fileName = words[i] # 文件名称

fromFile = os.path.join(filePath, fileName) # 文件地址

toFileName = changeSufix2Pdf(fileName) # 生成的文件名称

toFile = toFileJoin(filePath,toFileName) # 生成的文件地址

print ("转换:"+fileName+"文件中...")

# 某文件出错不影响其他文件打印

try:

doc = word.Documents.Open(fromFile)

doc.SaveAs(toFile,17) # 生成的所有 PDF 都会在 PDF 文件夹中

print ("转换到:"+toFileName+"完成")

except Exception as e:

print(e)

# 关闭 Word 进程

print ("所有 Word 文件已打印完毕")

print ("结束 Word 进程... ")

doc.Close()

doc = None

word.Quit()

word = None

except Exception as e:

print(e)

finally:

gc.collect()

# Excel

def excel2Pdf(filePath, excels):

# 如果没有文件则提示后直接退出

if(len(excels)<1):

print (" 【无 Excel 文件】 ")

return

# 开始转换

print (" 【开始 Excel -> PDF 转换】")

try:

print ("打开 Excel 进程中...")

excel = win32com.client.Dispatch("Excel.Application")

excel.Visible = 0

excel.DisplayAlerts = False

wb = None

ws = None

for i in range(len(excels)):

print(i)

fileName = excels[i] # 文件名称

fromFile = os.path.join(filePath, fileName) # 文件地址

print ("转换:"+fileName+"文件中...")

# 某文件出错不影响其他文件打印

try:

wb = excel.Workbooks.Open(fromFile)

for j in range(wb.Worksheets.Count): # 工作表数量,一个工作簿可能有多张工作表

toFileName = addWorksheetsOrder(fileName, j+1) # 生成的文件名称

toFile = toFileJoin(filePath,toFileName) # 生成的文件地址

ws = wb.Worksheets(j+1) # 若为[0]则打包后会提示越界

ws.PageSetup.Orientation=2 # 设置页面方向,纵向=1,横向=2

ws.ExportAsFixedFormat(0,toFile) # 每一张都需要打印

print ("转换至:"+toFileName+"文件完成")

except Exception as e:

print(e)

# 关闭 Excel 进程

print ("所有 Excel 文件已打印完毕")

print ("结束 Excel 进程中... ")

ws = None

wb.Close()

wb = None

excel.Quit()

excel = None

except Exception as e:

print(e)

finally:

gc.collect()

# PPT

def ppt2Pdf(filePath, ppts):

# 如果没有文件则提示后直接退出

if(len(ppts)<1):

print (" 【无 PPT 文件】 ")

return

# 开始转换

print (" 【开始 PPT -> PDF 转换】")

try:

print ("打开 PowerPoint 进程中...")

powerpoint = win32com.client.Dispatch("PowerPoint.Application")

ppt = None

# 某文件出错不影响其他文件打印

for i in range(len(ppts)):

print(i)

fileName = ppts[i] # 文件名称

fromFile = os.path.join(filePath, fileName) # 文件地址

toFileName = changeSufix2Pdf(fileName) # 生成的文件名称

toFile = toFileJoin(filePath,toFileName) # 生成的文件地址

print ("转换:"+fileName+"文件中...")

try:

ppt = powerpoint.Presentations.Open(fromFile,WithWindow=False)

if ppt.Slides.Count>0:

ppt.SaveAs(toFile, 32) # 如果为空则会跳出提示框(暂时没有找到消除办法)

print ("转换至:"+toFileName+"文件完成")

else:

print("(错误,发生意外:此文件为空,跳过此文件)")

except Exception as e:

print(e)

# 关闭 PPT 进程

print ("所有 PPT 文件已打印完毕")

print ("结束 PowerPoint 进程中... ")

ppt.Close()

ppt = None

powerpoint.Quit()

powerpoint = None

except Exception as e:

print(e)

finally:

gc.collect()

# 修改后缀名

def changeSufix2Pdf(file):

return file[:file.rfind('.')]+".pdf"

# 添加工作簿序号

def addWorksheetsOrder(file, i):

return file[:file.rfind('.')]+"_工作表"+str(i)+".pdf"

# 转换地址

def toFileJoin(filePath,file):

return os.path.join(filePath,'pdf',file[:file.rfind('.')]+".pdf")

# 开始程序

print ("====================程序开始====================")

print ("【程序功能】将目标路径下内所有的 ppt、excel、word 均生成一份对应的 PDF 文件,存在新生成的 pdf 文件夹中(需已经安装office,不包括子文件夹)")

print ("注意:若某 PPT 和 Excel 文件为空,则会出错跳过此文件。若转换 PPT 时间过长,请查看是否有报错窗口等待确认,暂时无法彻底解决 PPT 的窗口问题。在关闭进程过程中,时间可能会较长,十秒左右,请耐心等待。")

filePath = input ("输入目标路径:(若为当前路径:"+os.getcwd()+",请直接回车) ")

# 目标路径,若没有输入路径则为当前路径

if(filePath==""):

filePath = os.getcwd()

# 将目标文件夹所有文件归类,转换时只打开一个进程

words = []

ppts = []

excels = []

for fn in os.listdir(filePath):

if fn.endswith(('.doc', 'docx')):

words.append(fn)

if fn.endswith(('.ppt', 'pptx')):

ppts.append(fn)

if fn.endswith(('.xls', 'xlsx')):

excels.append(fn)

# 调用方法

print ("====================开始转换====================")

# 新建 pdf 文件夹,所有生成的 PDF 文件都放在里面

folder = filePath + '\pdf\'

if not os.path.exists(folder):

os.makedirs(folder)

word2Pdf(filePath,words)

excel2Pdf(filePath,excels)

ppt2Pdf(filePath,ppts)

print ("====================转换结束====================")

print (" ====================程序结束====================")

os.system("pause")

软件测评

软件能够对文档进行强制性的页面转换操作,适用于Excel、Word、PPT、PDF等多种格式的文件,让用户可以横向打印文件也能纵向打印文件,提升工作效率。

好了,今天的打印excel强制页面纵向.exe分享就到这里了,想要下载更多软件就来非凡软件站,快快收藏吧,更多精彩不容错过!

软件截图

查看安装过程

打印软件大全

打印软件大全 我们在日常的工作学习中经常需要用到打印的功能,可以将电脑中的文件打印为纸质的,今天小编整理了一些打印软件,可以帮助用户快速进行文件打印的操作,功能丰富多样,大家可以自行挑选。

软件资讯

更多>
  • 大麦app如何修改地址

    大麦app如何修改地址

    在大麦APP中,用户在购买演出票品时通常需要填写收货地址或取票地址。那么大麦app如何修改地址呢?感兴趣的朋友可以和小编一起来看看哦。大麦app如何修改地址1、首先打开大麦软件,进入到首页中可以切换到现场、会员、票夹、我的页面,我们点击右下角的【我的】;2、然后我的页面中可以在我的服务下面看到有演出订单、收货地址、评价、观演人、优惠券等功能,在这里点击【收货地址】;3、接着来到收货地址的页面中需要

  • 华为P70Art拍照怎么样

    华为P70Art拍照怎么样

    华为P系列主打的就是拍照,对于新出的art型号,它的拍照能力要比pro型号更出色。那么华为P70Art拍照怎么样呢?感兴趣的朋友可以和小编一起来看看哦。华为P70Art拍照怎么样拍照摄像能力极为出色。华为P70Art最大的卖点是搭载了一英寸主摄像头,这在华为智能手机中还是第一次出现。索尼IMX989主摄像头被裁剪后使用,虽然不如完整的版本,但仍然拥有卓越的拍摄表现。此外,华为P70Art还配备了一

  • 华为P70Pro有卫星通信功能吗

    华为P70Pro有卫星通信功能吗

    卫星通信是指利用人造地球卫星作为中继站来转发无线电信号,实现地球上的无线电通信的技术。那么华为P70Pro有卫星通信功能吗?下面就让小编为大家详细介绍一下吧。华为P70Pro有卫星通信功能吗全系支持卫星通信。华为P70Pro引入了北斗卫星通信系统,这是华为在通信技术方面的重大突破。北斗卫星通信系统提供了更高精度的定位服务和稳定的通信能力,极大提升了华为在全球手机市场的竞争力。华为P70Pro引入北

  • 闲鱼圈子入口怎么进

    闲鱼圈子入口怎么进

    闲鱼APP中的“圈子”功能是一个社交化二手交易社区,用户可以根据兴趣爱好或交易需求加入不同的圈子。那么闲鱼圈子入口怎么进呢?下面就让小编为大家详细介绍一下吧。闲鱼圈子入口怎么进1、首先打开闲鱼软件,进入到首页中后我们可以切换到很多不同的页面,在这里我们点击右下角的【我的】;2、然后在我的页面中我们往上滑动到页面的下方之后就可以找到【我的圈子】功能了;以上就是闲鱼圈子入口在哪的全部内容了,非凡软件站

  • 闲鱼闲气值如何恢复

    闲鱼闲气值如何恢复

    闲鱼APP中的“闲气值”是衡量用户在平台信誉度的一个重要指标。闲气值越高,表示用户的信誉越好,其在平台内的行为越规范。那么闲鱼闲气值如何恢复呢?闲鱼闲气值如何恢复1、首先我们打开闲鱼软件,进入到首页中后可以切换到不同的页面中,在这里我们点击右下角的【我的】;2、然后在我的页面中我们往下滑动到页面的下方点击【安全中心】;3、接着来到安全中心的页面中可以设置的功能有很多,在这里点击【闲气值】;4、最后

  • 闲鱼在哪修改ip地址

    闲鱼在哪修改ip地址

    闲鱼是一款很实用的二手交易平台,在这里我们可以购买很多不同的商品,也能出售自己的闲置物品,如果想修改自己的地址怎么操作呢?下面就来和小编一起看看吧!闲鱼ip地址修改方法分享1、首先我们打开闲鱼软件,进入到首页中后我们可以在左上角看到有海鲜市场、推荐、地址,在这里我们点击【地址】;2、然后在地址的页面中我们点击地址旁边的【向下箭头】;3、最后点击过后在选择城市的页面中我们点击城市即可;以上就是小编今

注意事项

本站所有资源(含游戏)均是软件作者、开发商投稿,任何涉及商业盈利目的均不得使用,否则产生的一切后果将由您自己承担!本站将不对任何资源负法律责任,所有资源请在下载后24小时内删除。
如侵犯了您的版权、商标等,请立刻联系我们并具体说明情况后,本站将尽快处理删除,联系版权说明注意事项)。若有关在线投稿、无法下载等问题,请与本站客服人员联系
用户可自行按线路选择相应的下载点,可以直接点击下载/另存为,若直接点击下载速度太慢,请尝试使用高速下载器。为确保下载的文件能正常使用,请使用WinRAR最新版本解压本站软件。
建议大家谨慎对待所下载的文件,大家在安装的时候务必留意每一步!关于360安全卫士QQ电脑管家的有关提示,请自行注意选择操作。