如图所示:A:H是打印区域。点击上下箭后,会带出左边不同显示的内容。如何点击批量打印将其序号带出的内容全部打印完成。
是的。
Sub 打印() MyPrintArea = "$A$1:$H$10" '打印区域,自己修改 Range("$A$1:$H$10").Select '打印区域,自己修改 Selection.Columns.AutoFit ActiveSheet.PageSetup.PrintArea = MyPrintAreaEnd Sub