我需要打印一个文件夹里多个我需要的excel文件(近百个,格式一样)如何...
发布网友
发布时间:2022-05-02 14:54
我来回答
共5个回答
热心网友
时间:2022-05-21 17:50
格式一样的表 有办法用一个表格调用数据,只用在一张表里将数据调取到当前工作表,设置一个打印宏,一键打出。
热心网友
时间:2022-05-21 19:08
我需要打印一个文件夹里多个excel文件(近百个,格式一样)如何调整打印设置,方法如下:
要通过Excel中的“宏”功能,然后编辑代码,代码如下:
Sub 批量打印设置()
Dim lj Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder(0, "选择文件夹", 0, 0) If objFolder Is Nothing Then MsgBox "未选择文件夹"
Exit Sub End If
lj = objFolder.self.Path
If Right(lj, 1) <> "\" Then
lj = lj & "\"
End If
Set objFolder = Nothing
Set objShell = Nothing
myFile = Dir(lj & "*.xls")
While myFile <> ""
Workbooks.Open lj & myFile '这里放入打印设置代码,可通过录制宏来自动生成,然后拷贝到此处
ActiveWorkbook.Close 1
myFile = Dir
WendEnd Sub
热心网友
时间:2022-05-21 20:43
1、用代码将多个文件合并到一个工作薄里,代码自己百度。
2、在合并后的工作薄里,接住shift键单击工作表,将所有工作表选中,调整页面设置。
3、试打印一页看效果,不理想再重复上面2。
4、打印,选择整个工作薄。
热心网友
时间:2022-05-21 22:34
直接把他们全部选取,然后设置打印在一张纸里面,然后打印出来的就非常的整齐了
热心网友
时间:2022-05-22 00:42
可以在打印设置的时候选择整个工作簿,这样的话就可以把所有的都打出来了 。