|
如图所示打印份数(下文黄色部分)可以正确引用,而打印范围(下文红色部门)数据却不能,如果写成具体数字From:="6", To:="7", 可以正确执行,引用的两个数据都是文本框里的,是不是打印范围的数据类型有误呢,请高手帮忙分析、解决一下,不甚感激。
“确定”按钮代码如下
Private Sub CommandButton1_Click()
Application.PrintOut FileName:="", Range:=wdPrintFromTo, Item:= _
wdPrintDocumentContent, Copies:=Val(TextBox1.Text), From:="Val(TextBox2.Text)", To:="Val(TextBox2.Text) ", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
Unload Me
End Sub
form1代码如下,应该没有问题
Sub printer()
UserForm1.CommandButton1.Enabled = True
UserForm1.Show
End Sub
|
|