关于excel打印的问题

zhiwen20190717

销售每次提供的excel出库模板都不一样，但最终的出库单模板尺寸是固定的24.1cm*14cm，导致每次打印时，都要打印调整好几次才能打印出来，

能不能有个方式让销售用excel做出库时，会提示他哪里要调整，或者哪位高手另外高招解决这个问题，十分感谢

SoyaDokio

1. ' 获取打印页面的尺寸：
   
2. Dim paperSize
   
3. paperSize = Worksheets("Sheet1").PageSetup.PaperSize

复制代码

不过我觉得思路上是不是有点问题：如果你能让销售提供的出库模板带打印页面尺寸自检功能了，也就是说他们的模板来源是你，那你直接调整好打印页面的尺寸再给他们不就好了么？毕竟一般没人会动打印尺寸。
如果销售的模板来源不是你，这才是常见现象吧，这种时候可以考虑写个VBA遍历所有销售提供的出库模板的Excel，检查内容就是通过上面提供的获取打印页面的尺寸来判断尺寸是否合规。

f8b1987

做一份空白的表，设定好打印格式，套用公式取数过来。每次打印时，点开这份表直接打印