Private Sub CommandButton1_Click()For i = Range("AO11") To Range("AW11")
Range("AO9") = i
ActiveSheet.PrintOut
Next
End Sub
ActiveSheet.PrintOut 提示出现错误
打印机名字变了,你代码对应的改了吗,还是说你打印机名字配在配置文件里了,还是你弹出对话框选打印机了?如果你代码里写死了旧的打印机,换新的当然打不出来