2012-03-01 198 views
0

我有一個excel工具,是由我之前的某人制作的。但是,製作工具時,它會將工作表輸出到適合Excel 2007中可打印區域的特定尺寸。但是,在Excel 2010中,尺寸已關閉。如何在工作表中更改打印區域的大小而不必更改每個工作表中單個單元格的大小?excel vba調整大小打印區域

感謝任何人可以提供2美分。

+0

這將是有益的看到不工作的代碼。我不確定你想要做什麼。我也會使用宏記錄器。打開它,執行所需的步驟以獲得正確的結果,並生成一些有用的代碼。 – 2012-03-02 01:43:24

+0

我沒有任何代碼。我只有一個Excel工具,可生成可打印的新信息工作表。但新工作表的大小並不總是適合的。我想我需要用一個函數改變每張紙的打印尺寸,並在每次創建一個新頁面時調用該函數。此外,頁面會逐個插入新的工作表中,因此每張工作表中都有多個可打印的頁面。如果我只能打印一次,它會使該表中的所有頁面大小相同嗎? – thebiglebowski11 2012-03-05 19:40:09

回答

1

我假設到打印區域設置爲單元格區域的編程能力會得到你,你想成爲:

Dim MyPrintArea As Range 
Set MyPrintArea = ActiveSheet.Range("A1:G15") 

ActiveSheet.PageSetup.PrintArea = MyPrintArea 

盡我所能做的基於問。

+1

printArea中是一個字符串,所以代碼應該是:ActiveSheet.PageSetup.PrintArea = MyPrintArea.Address或繞過範圍,只是使用的字符串,如:ActiveSheet.PageSetup.PrintArea =「A1:G15」 – 2012-03-02 01:37:46