楼主 悟空师弟 |
Q:如何实现有颜色的区域不打印? A: 打开文件时启用宏,然后点击“点击此处打印”按钮即可。 详见附件: 如何实现有颜色的区域不打印?.rar 代码如下: Sub 打印() Range("A1:K1,A3:B3,E3:F3,I3,A5:A12").Select Selection.Interior.ColorIndex = xlNone Selection.Font.ColorIndex = 2 ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Range("A1:K1,A3:B3,E3:F3,I3,A5:A12").Select With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid End With Selection.Font.ColorIndex = 0 End Sub |
2楼 sam.tan |
学会了,谢谢. |
3楼 lrlxxqxa |
呵呵,看不懂,初学vba |