Tag: 印刷

如何通过在Excel 2010中筛选来自动打印？

我有一个有5个字段的电子表格，唯一重要的就是仓库＃。 我需要为每个仓库编号做一个单独的印刷工作，但我有12,000个logging，可能还有几百个不同的仓库编号。 目前，我筛选了一个特定的仓库＃，突出显示所有这些，通过select打印。 打印作业popup，但我必须再次为下一个仓库＃进行此操作。 有没有办法让这个自动化？

Excel：如何获得一个区域独立的打印机名称？

Excel中有一个PrintOut方法可以打印内容。 它接受打印机名称作为参数，并且该打印机名称不仅是系统打印机名称，而且是打印机所连接的系统打印机名称和端口的组合。 .PrintOut ActivePrinter:="MyPrinter" & " on " & "Ne00:" 如果您只提供一个系统名称，Excel将不会find它，并且不会打印。 请注意， " on "片。 真正的英文单词“on”使得“excel打印机名称”变得人性化。 问题是，这个小块在每个本地化版本的Excel上是不同的。 因此，要编写真正的“excel打印机名称”的代码将需要包括一个巨大的switch ，其中所有可能的Excel语言环境将被列为相应的“开”的翻译。 我甚至没有这样的名单。 但是我想知道，或者想知道如何在飞行中弄清楚这件事。 Application.International属性似乎并不包含答案。

使excel在单个打印作业中打印多个工作表

我正在使用COM自动化打开一个xls文件并将其打印到虚拟PDF打印机。 Sheets sheets(m_Application.GetSheets()); sheets.PrintOut(CovOptional,CovOptional,CovOptional,CovOptional,COleVariant(_T("My PDF Printer")),CovOptional,CovOptional); 但是，如果文件有多个工作表，excel为每个工作表创build一个单独的打印作业，所以我得到了几个PDF文件而不是一个。 我如何强制它打印一个打印作业中的所有纸张？

JasperReports如何在Excel中做分页

我正在试图在每个页面的底部和顶部的列标题页面编号/rest，所以从Excel打印时，所有的页面编号和领导。 这不应该是一个大问题，对吧？ 但不幸的是，无论我尝试了什么方法，我都无法在页面底部获得页码和分页符 – 它们在其他任何地方，但在底部。 我把“页面的Y页”页面页脚部分，忽略分页不会被检查，当我生成的报告，我有页面X或Y后每4行数据。 我把页面高度扩展到Letter Landscape格式的标准高度的3-4倍，并且在18-20行数据之后改变了页脚的打印 – 这不是一个可靠的调整方法。 此外，我试图把打印时的分页符设置为每20行打印一次，但这仍然是不准确的，因为在第一页上我有较less的数据行，因为报告标题 – 如果我调整它是正确的第一页 – 它会打印在下一页中间的某个地方。 我在devise中错过了一些明显的东西，如何把页脚放到页脚？ 任何帮助将不胜感激。

在Excel中打印数组大括号

我有一个Excel电子表格与数组公式。 我可以在公式栏中看到带有大括号的公式，但是当我使用“显示公式”显示公式时，不显示大括号。 有没有办法使用数组大括号获得打印输出？ 它显示在公式栏中，如下所示： {=C3:C7*D3:D7} 当使用“显示公式”显示在单元格中时，显示如下： =C3:C7*D3:D7

在相同的缩放下打印两张不同的纸张尺寸的macros

我设置了一个macros来打印一个大的数据集。 它不适合在一张纸上（宽度方向，它可以根据需要在高度方向上延伸）。 它在11×17（Macro1）上打印2/3的数据，在8.5×11（Macro2）上打印1/3的数据。 为了使它适合，我正在使用以下内容： .Zoom = False .FitToPagesWide = 1 .FitToPagesTall = False 现在，这工作得很好。 不幸的是，当它缩小的时候，两张纸的比例是不一样的，所以你不能把8.5×11放在11×17的旁边，而且行也要匹配。 反正有一个macros从一个macros到另一个macros？ 如果设置.FitToPagesWide ，则.Zoom只返回false。 还应该注意的是，数据集可能会增加2到4列。 所以如果我为纸张设置一个特定的缩放比例，我觉得在任何情况下都不行。 理想情况下，我希望只适合11×17，并且8.5×11的规模相同。 编辑我使用了接受的答案，并删除了我的macros几个不必要的项目。 最终的代码如下： .Zoom = 60 With ActiveSheet Do While .VPageBreaks.Count > 2 .PageSetup.Zoom = .PageSetup.Zoom – 1 ActiveWindow.View = xlPageBreakPreview ActiveWindow.View = xlNormalView Loop End With 编辑2当前代码迭代包括几个步骤来debugging。 With ActiveSheet i = 1 .PageSetup.Zoom = […]

VB6打印通过Excel和select两台打印机之一

我广泛地search了解决问题的方法，但是我担心它坐在我的前面，我看不到它。 问题：我有一个调用excel的VB6应用程序，并使用一个excel文件作为数据库来从第二张表中拉取地址，并将地址放入我需要打印的“地址标签”中。 这大大减less了地址中的打字错误，并使我可以通过自动创buildPALLET X OF X来加速这一过程。所以，只要默认打印机是托盘标签需要打印的打印机上。 我想在这个程序中join第二个样式标签，我已经成功完成了这个任务。 该程序将调用并填写所有必需的信息，并根据select的选项，它将打印两个Excel模板之一。 我遇到的问题是，我不能为我的生活得到它打印到一台打印机的大标签，同时也打印到小标签打印机的另一个标签。 我已经成功创build了一个独立的程序，我可以打印到任何打印机，但我不能让我的标签应用程序来做到这一点。 我有一种感觉与Excel的应用程序设置或东西有关。 在我认为是正确的位置（command3button）程序中列出了独立程序使用的打印机名称， Option Explicit Dim SelectAll As Integer Dim location As String Dim location2 As String Dim loadedlist As Integer Dim big_small As String Dim prt As Printer 'trying to preload excel Dim excel_app As Excel.Application Dim workbook As Excel.workbook Dim sheet As Excel.Worksheet Dim […]

无法获取Excel以使用VBA打印特定的工作表

假设我有一个包含3张工作表的“工作表1”，“工作表2”和“工作表3”的工作簿。 现在我只想打印“Sheet 1”，所以在我使用的VBA中 Sheets("Sheet 1").PrintOut 但macros仍然打印所有3个工作表。 发生了什么事，导致它打印所有3张，当我专门写代码只打印1？ Activesheet.Printout 'also print all worksheets. 我正在使用：Microsoft Excel Professional Plus 2010