excel - 没有单元格格式的 VBA 打印宏

Question

这是我当前打印这些单元格的代码

Sub printSticker()
    Worksheets("Sticker").Range("A1:D4:B6").PrintOut
End Sub

但是这样可以保留它们的格式，所以我可以选择它们的去向（它们必须适合预先打印的贴纸）

例如

在 D4 上，它将包括来自 A4 B4 和 C4 的单元格，因此在 D4 之前有一个宽阔的空间

我想删除这个空间，所以 A1 D4 和 B6 整齐地堆叠在一起

电子表格

Answer 1

Preview:=True通过在表达式末尾添加来预览您正在打印的内容

Worksheets("Sticker").Range("A1:D4:B6").PrintOut Preview:=True

或File»Print

好的，您需要使用工具栏上的对齐控件来对齐您的值

您也可以点击F1并键入Print Labels以获取分步指南。