Excel精英培训网

 找回密码
 注册

QQ登录

只需一步,快速开始

你正在寻找更好的Excel学习教程吗?Excel技巧80集+数据透视表+函数初中高全套+VBA80集,想学的这儿全都有
查看: 403|回复: 17

[求助] Excel打印问题(打印信封)

[复制链接]
发表于 2017-12-2 13:59 | 显示全部楼层 |阅读模式
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
附件A,B俩表,打印效果如图,如何设置B表的打印做到A表的效果,感恩

A打印效果

A打印效果

B打印效果

B打印效果

打印.rar

4.29 KB, 下载次数: 7

发表于 2017-12-2 15:48 | 显示全部楼层
一个公式完成的

打印.rar

5.29 KB, 下载次数: 2

回复 支持 反对

使用道具 举报

发表于 2017-12-2 15:50 | 显示全部楼层
一个公式做的,不知道是不是要这个效果

打印.rar

5.29 KB, 下载次数: 6

回复 支持 反对

使用道具 举报

 楼主| 发表于 2017-12-2 18:14 | 显示全部楼层
高 发表于 2017-12-2 15:50
一个公式做的,不知道是不是要这个效果

老师,附件解压不了,可以直接发公式吗?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2017-12-2 18:21 | 显示全部楼层
高 发表于 2017-12-2 15:50
一个公式做的,不知道是不是要这个效果

除此之外,表A打印是可以把A列的全部打印出来,我自己做的表B只能逐个点击打印,是不是某种打印设置?
回复 支持 反对

使用道具 举报

发表于 2017-12-2 19:29 | 显示全部楼层
本帖最后由 高 于 2017-12-2 19:55 编辑

=IF(LENB(MID(A2,1,1))=1,SUBSTITUTE(A2,RIGHT(A2,LENB(A2)-LEN(A2)),LEFT(RIGHT(A2,LENB(A2)-LEN(A2)),LENB(A2)-LEN(A2)-3)&"   "&MID(A2,LEN(A2)-2,2)&CHAR(10)&RIGHT(A2,LENB(A2)-LEN(A2)),1),SUBSTITUTE(SUBSTITUTE(A2,CHAR(10),MID(A2,FIND(CHAR(10),A2),LEN(A2)-FIND(CHAR(10),A2))&CHAR(10),1),IF(ISERROR(FIND("先生",A2)),"女士","先生"),IF(ISERROR(FIND("先生",A2)),"   女士","   先生"),1))
另外,刚刚看到你的B表设置了打印区域。把打印区域取消。
已发的压缩文件里的公式还有些问题,就按这个公式吧
回复 支持 反对

使用道具 举报

 楼主| 发表于 2017-12-2 19:44 | 显示全部楼层
谢谢老师,如果我设置整列打印,那么就达不到一个地址一个信封的目的了,只能选择单个单个单元格。
我的工作流程是这样的:
把空白信封放进打印机,直接把地址打印在信封上。
我查了一天都找不到怎么设置。
还是用word设置好?在复制到excel上?

回复 支持 反对

使用道具 举报

发表于 2017-12-2 19:58 | 显示全部楼层
67469698 发表于 2017-12-2 19:44
谢谢老师,如果我设置整列打印,那么就达不到一个地址一个信封的目的了,只能选择单个单个单元格。
我的工 ...

一、我回复的公式有修改,以上面的为准。
二、如果想一次打印一个单元格的内容,请插入分页符。
回复 支持 反对

使用道具 举报

发表于 2017-12-2 20:16 | 显示全部楼层
Sub 插入分页符()
For x = 2 To Range("A65536").End(xlUp).Row
   ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=Rows(x & ":" & x)
    Next
End Sub
回复 支持 反对

使用道具 举报

发表于 2017-12-4 16:09 | 显示全部楼层
没那么多事,直接设置下打印纸张为Envelope #10,横向打印,然后把打印区域取消就OK了。
回复 支持 反对

使用道具 举报

*滑块验证:
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2018-6-19 03:02 , Processed in 0.078000 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表