Excel 使用VBA将打印区域的位置从一个文件复制到另一个文件_Excel_Vba

Excel 使用VBA将打印区域的位置从一个文件复制到另一个文件

excel vba

Excel 使用VBA将打印区域的位置从一个文件复制到另一个文件,excel,vba,Excel,Vba,我有一个程序，它已经将图纸从模板库复制到另一个可以使用的文件中。有没有办法让它也复制模板中打印区域的位置，并使新文件具有相同的打印区域 Workbooks("TestLibrary.xlsx").Sheets(Size).Range("A1:AO311").Copy_ ThisWorkbook.Sheets(SheetNum).Range("A1") Workbooks("TestLibrary.xlsx").Sheets(Size).Range("A1:AO311").Copy_ This

我有一个程序，它已经将图纸从模板库复制到另一个可以使用的文件中。有没有办法让它也复制模板中打印区域的位置，并使新文件具有相同的打印区域

Workbooks("TestLibrary.xlsx").Sheets(Size).Range("A1:AO311").Copy_ 
ThisWorkbook.Sheets(SheetNum).Range("A1")

Workbooks("TestLibrary.xlsx").Sheets(Size).Range("A1:AO311").Copy_
ThisWorkbook.Sheets(SheetNum).Range("A1:AO311").PasteSpecial_ 
Paste:=xlPasteColumnWidths

尝试一下：

ThisWorkbook.Sheets(SheetNum).PageSetup.PrintArea = Workbooks("TestLibrary.xlsx").Sheets(Size).PageSetup.PrintArea

你的代码是什么？编辑：我把它放在原来的帖子里，这样更容易阅读