打印标签 vba

Question

我有一个包含以下内容的工作表

A1 xxx
A2 yyy
A3 zzz

B1 2
B2 5
B3 7

我想要一个宏，使我能够打印单元格 A1 和单元格 B1 中的值，即要打印的份数。 我希望它也循环遍历 A 列中的所有项目。

不能让它工作

Answer 1

不确定我是否理解你的问题。 但是，根据您发布的内容，我认为这就是您要完成的工作：

您有一个如下所示的电子表格：

 A        B       C

1 xxx yyy zzz 2 2 5 7 3 aaa bbb ccc 4 9 4 6... 998 abc def ghi 999 8 2 3

并且您想为空单元格操作一些单元格并重新调整打印输出。 不确定宏会那样做。 这是更适合程序完成的事情。 但是，也许这不是您的选择。

现在我假设您想将其打印在激光标签上，尺寸为 1"x2-5/8"，横向 3 个，纵向 10 个。 您希望您的 output 看起来像这样：

xxx    yyy    zzz          aaa    bbb    ccc         ddd    eee   fff


 2      5      7            9      4      6            8     2     3

我想这是你的问题？ 如果是这样，以下是您将遇到的问题：

1. 标签是为过去的时代发明的，当时 Courier 字体是事实上的标准。 Courier 将每英寸打印 6 行，每英寸打印 10 个字符。 标签有不同的大小和横跨的列数。 今天，标签仍在按照这些标准生产。 Courier 字体是一种固定且不可缩放的字体。 这意味着字母“H”占用与字母“i”相同的空间，并且字体不可缩放。

2. 大多数电子表格在显示和打印时都可以缩放。 您可以在单元格中使用 Courier fonts，这可能对您有所帮助。 但是，最终，这就像试图混合油和水一样。

3. 您的打印机对页面上的 position 个项目使用网格。 大多数打印机使用 HP 的 PCL 语言。 对于您正在做的事情，PCL5 可以正常工作。 大多数会计应用程序在纸上使用 300x300 的网格作为立方英寸。 因此，如果您 position 要在 150,150 打印一些东西，它将在页面上向下打印 1/2"。如果您在页面上打印 1500,300 的东西，它将在页面上 5" 和向下打印 1" .电子表格的问题是每个字体大小的间距固定不同。这意味着它将开始正确打印，然后慢慢偏离路线。注意：忽略您的打印机可能是 600 dpi 或 1200 dpi 打印机的事实.对于打印，你可以设置不同尺寸的dpi比例。300dpi用于尺寸调整（不是分辨率）是核算的标准。

由于这很可能是会计应用程序，您的办公室可能有电子 Forms 软件。 这是实现目标的最佳途径。 EFS 将弥合比例数据之间的差距，并将其精确、轻松地放置在固定的网格格式中。

您也可以尝试将其导出到 Word 并将其设置为打印到标签。 许多文字处理器都能够打印到标签。

您尝试做的事情看起来很简单，电子表格和打印机之间发生的事情的复杂性绝非简单。