Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/25.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 如何创建VBA代码来打印同一工作表的多个副本?_Excel_Vba - Fatal编程技术网

Excel 如何创建VBA代码来打印同一工作表的多个副本?

Excel 如何创建VBA代码来打印同一工作表的多个副本?,excel,vba,Excel,Vba,我在excel中有一个按钮,我想让它打印X份。比如说10件,这样商品就有存货了。我想印10份。我有一个查询商品信息的公式。我只想要一个代码,可以打印出我将要填写的“数量”的很多次。基本上 Sub PrintXCopies() ActiveSheet.PrintOut , , Range("A1").Value End Sub 其中要打印的份数在单元格A1中。如果这不是一个数字或一个合理的数字,您应该添加错误处理。比如: Sub PrintXCopies() If IsNumer

我在excel中有一个按钮,我想让它打印X份。比如说10件,这样商品就有存货了。我想印10份。我有一个查询商品信息的公式。我只想要一个代码,可以打印出我将要填写的“数量”的很多次。

基本上

Sub PrintXCopies()
    ActiveSheet.PrintOut , , Range("A1").Value
End Sub
其中要打印的份数在单元格A1中。如果这不是一个数字或一个合理的数字,您应该添加错误处理。比如:

Sub PrintXCopies()
    If IsNumeric(Range("A1").Value) Then
        If Range("A1").Value >= 1 And Range("A1").Value < 10 Then
            ActiveSheet.PrintOut , , Range("A1").Value
        End If
    End If
End Sub
Sub-PrintXCopies()
如果是数字(范围(“A1”).值),则
如果范围(“A1”)值>=1且范围(“A1”)值<10,则
ActiveSheet.PrintOut,范围(“A1”).值
如果结束
如果结束
端接头
基本上

Sub PrintXCopies()
    ActiveSheet.PrintOut , , Range("A1").Value
End Sub
其中要打印的份数在单元格A1中。如果这不是一个数字或一个合理的数字,您应该添加错误处理。比如:

Sub PrintXCopies()
    If IsNumeric(Range("A1").Value) Then
        If Range("A1").Value >= 1 And Range("A1").Value < 10 Then
            ActiveSheet.PrintOut , , Range("A1").Value
        End If
    End If
End Sub
Sub-PrintXCopies()
如果是数字(范围(“A1”).值),则
如果范围(“A1”)值>=1且范围(“A1”)值<10,则
ActiveSheet.PrintOut,范围(“A1”).值
如果结束
如果结束
端接头

是否要打印工作表???还是要在工作表中选择一个范围并仅打印该范围?我要打印该工作表的多份副本。就像现在我有工作表(“姓名”)。打印输出,但我想能够打印一份来自web开发人员框的数字a副本。你想打印工作表吗???还是要在工作表中选择一个范围并仅打印该范围?我要打印该工作表的多份副本。就像现在我有纸(“名字”)。打印输出,但我想能够打印一个数字a副本从一个网络开发人员框。