如何在 VBA 中打印大型用户表单

2023-12-26

我在 VBA 中有一个大型用户表单,表单上已经有一个“打印”选项,可以打印一半的表单。

请告诉我如何在两页内打印横向和整个表格。

Thanks


Userform PrintForm 方法不提供任何选项。另一方面,工作表提供了无数的选项。

I would use AltPrintScreen to copy the Userform's image to the Windows ClipBoard and then paste it to a worksheet as an image.

Private Sub btnCopyUserformBitMap_Click()
    Application.SendKeys "(%{1068})"

    DoEvents
    Application.Wait Now + TimeSerial(0, 0, 1)

    Worksheets("Print Userform").Range("A1").PasteSpecial
End Sub
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

如何在 VBA 中打印大型用户表单 的相关文章

  • 在 Excel 中查找结果将行复制到另一张工作表

    我需要一些帮助将数据从一个 Excel 工作表复制到另一个 例如 样本数据 A B C 1 aaa bbb ddd 2 bbb ccc eee 2 bbb ccc eee 3 ccc fff rrr 4 ccc fff ttt 5 ddd
  • VBA将二进制图像转换为网页的base64编码字符串

    我正在尝试读取 JPG 文件并将该文件转换为 base64 编码的字符串 该字符串可用作网页上的嵌入 jpeg 我在网上发现了两个在 VBA 中进行 Base64 编码 解码的函数 它们似乎被广泛接受 编码 解码过程产生了我的原始二进制字符
  • 在 Perl 中如何用空格填充字符串的一部分?

    你更喜欢哪个版本 usr bin env perl use warnings use strict use 5 010 my p 7 33 my prompt my key very important text my value Hell
  • 在 VBScript 中将 IF 语句拆分为多行

    我想知道在 VBScript 中我是否可以打破If多行语句 喜欢 If UCase Trim objSheet Cells i a Value YES Or UCase Trim objSheet Cells i b Value NO Th
  • Excel 表格:识别未使用的代码

    我正在更新一个excel questions tagged excel由其他人编写的应用程序 当然 我发现很多没用过的Sub CommandButtonXX Click subs 而且我并不总是确定该按钮是否仍然存在 有没有办法 程序 VB
  • 使用 SharedStringTable 和 .net 中的 xml sdk 设置文本值

    我有一段代码 如下 可以获取Excel中特定单元格的文本 但我不知道如何修改此文本以更改单元格文本 public static void UpdateTextCell string docName string text uint rowI
  • 处理 1.15 亿个细胞的最快方法是什么?

    我收到了一项工作任务 其中我要查找 8 位数字并将其替换为来自 2 列表的相应新值 基本上是一个 vlookup 然后用新值替换旧值 我面临的挑战是 2 列表有 882k 行 我尝试替换的单元格约为 1 2 亿 41 000 行 x 300
  • 复制两个 Excel 实例之间的范围

    我正在运行两个单独的 Excel 实例 并且尝试将数据从一个工作簿中的范围复制到另一个工作簿中 我有这个代码 Sub CopyValues Dim xlApp As Excel Application Set xlApp GetObject
  • 即使队列已重命名,如何在 Windows 上唯一标识该打印队列?

    如何唯一且可靠地识别给定服务器上的 Windows 打印队列 包括跨打印队列重命名 我想处理如下情况 Jdoe 创建打印机 A 我的程序在某个时刻收集有关打印机 A 的信息 Jdoe 将打印机 A 重命名为打印机 AA 我的程序在某个时刻再
  • Java 使用标签打印机打印到特定页面尺寸

    我正在尝试使用标签打印机 具体来说是EPSON TM T88V 来吐出PNG图像 我可以让它打印得很好 除了当我打印图像尺寸 再次具体说明为 72dpi 时为 220x175 时 打印的图像顶部有一团空白 我认为这是浪费纸张 关于如何最大限
  • Excel VBA 组合框识别

    我的用户表单上有 4 个以上的组合框 当他们触发时 他们触发相同的事件 我想做的是找出哪个 ComboBox 触发了该事件 组合框的创建取决于组件的数量 生成组合框的代码如下所示 For j 0 To UBound ComponentLis
  • COM 错误?打开工作簿两次会导致引用损坏

    归功于fuglede https stackoverflow com users 5085211 fuglede为了引起我的注意 这是 COM 错误吗 我打开 Excel 工作簿 A 然后打开工作簿 B 这两个工作簿在单元格 A1 中都有一
  • Excel IE 自动化识别“css”元素

    仍然在抓取网站 从网页打印等方面进行掠夺 但遇到了一个障碍 我希望有人可以帮助我 下图显示了我想要激活的选项卡 我有代码可以到达那里 但无法激活该选项卡 虽然最后一行代码可以在我的台式电脑上运行 但我无法让它在我的其他电脑上运行 我可能可以
  • 如何在 A4 纸张大小的页面中制作 HTML 页面?

    是否有可能使 HTML 页面的行为类似于 MS Word 中的 A4 大小的页面 本质上 我希望能够在浏览器中显示 HTML 页面 并以 A4 尺寸页面的尺寸概述内容 为了简单起见 我假设 HTML 页面仅包含文本 没有图像等 并且不会有
  • 无需打开即可打印 PDF

    我想要构建的是 通过单击按钮 我想触发 PDF 文件的打印 但不打开它 Print PDF Click gt printPdf pdfUrl 我第一次尝试的方法是使用 iframe var iframe null This is suppo
  • Excel 2010 中隐藏行的宏

    我对 VBA 编程有点陌生 我在互联网上阅读了一些内容 但找不到我需要的内容或无法使其正常工作 我的问题 在工作表 表 1 的单元格 B6 中 给出了项目将被利用的年数 在工作表 sheet 2 和 sheet 3 中 我制作了 50 年的
  • 创建具有子级别的类属性

    我一直在读这个topic https excelmacromastery com vba class modules A Quick Guide to the VBA Class Module关于如何使用类模块 我的目标是提高代码性能和可读
  • Excel 仅粘贴特殊使用值,还将值的数据类型与值一起复制到目标单元格中

    我一直在尝试更多地了解 Excel 单元格 特别是它们的数据类型 如果有人对细节感兴趣 我的调查位于下面的编号点中 我的结论被标记为 A 到 D 我真的很感兴趣是否有人有什么可以补充的 答 每个 Excel 单元格都有一个属性 用于定义它将
  • 如何将 csv/文本文件从 Android 手机发送到 WiFi 打印机?

    我正在开发一个 Android 应用程序 我应该从数据库中获取 csv txt 文件格式的数据 然后我必须将文件发送到 wifi 打印机 有谁知道我如何开始这样做 答案终于很简单 Socket client new Socket IP PO
  • 有没有办法破解 Excel VBA 项目的密码?

    我被要求更新一些 Excel 2003 宏 但 VBA 项目受密码保护 而且似乎缺少文档 没有人知道密码 有没有办法删除或破解 VBA 项目上的密码 你可以直接尝试这个VBA不需要十六进制编辑的方法 它适用于任何文件 xls xlsm xl

随机推荐