一、excel宏编程如何对打印机进行设置
这个都可以用宏来设置的，比如：
LeftMargin
属性
以磅为单位返回或设置左边距的大小。Double
类型，可读写。
边距的设置和返回均以磅为单位。可使用
InchesToPoints
方法进行英寸到磅值的转换，也可使用
CentimetersToPoints
方法进行厘米到磅值的转换。
示例:
将
Sheet1
的左边距设为
1.5
英寸。
Worksheets("Sheet1").PageSetup.LeftMargin
=
Application.InchesToPoints(1.5)
将
Sheet1
的左页边距设为
2
厘米:
Worksheets("Sheet1").PageSetup.LeftMargin
=
Application.CentimetersToPoints(2)
显示
Sheet1
的左边距的当前设定值:
marginInches
=
Worksheets("Sheet1").PageSetup.LeftMargin
/
_
Application.InchesToPoints(1)
MsgBox
"The
current
left
margin
is
"
&
marginInches
&
"
inches"
再示例
设置四个边界、页眉边界、页脚边界、纸张、打印缩放比例：
With
ActiveSheet.PageSetup
.LeftMargin
=
Application.InchesToPoints(0.787)
.RightMargin
=
Application.InchesToPoints(1.181)
.TopMargin
=
Application.InchesToPoints(0.393)
.BottomMargin
=
Application.InchesToPoints(1.574)
.HeaderMargin
=
Application.InchesToPoints(0.511)
.FooterMargin
=
Application.InchesToPoints(0.905)
.PaperSize
=
xlPaperEnvelopeB5
'用B5纸
.Zoom
=
95
'缩小到95%打印
End
With
Good
luck!
二、如何通过EXCEL宏功能实现打印选定内容
通过EXCEL宏功能实现打印选定内容的具体步骤如下：
1、首先打开需要编辑的Excel表格，进入到编辑页面中，打开开发工具中的“插入”，选择第一个图标。
2、然后框选出一个按钮，右键单击该按钮选择打开“指定宏”。
3、然后在弹出来的窗口中点击打开“编辑”选项。
4、然后在弹出来的窗口中点击输入代码如下：
Sub 按钮8_Click()
For i = Range('I1') To Range('I2')
Range('H1') = i
ActiveSheet.PrintOut
Next
End Sub 输完后，单击按钮即可。
