エクセルvbaリサイズプリントエリア

私の前に誰かが作った優れたツールがあります。しかし、ツールを作成すると、Excel 2007の印刷可能領域に収まる一定のサイズのワークシートが出力されます。ただし、Excel 2010ではサイズ調整がオフになっています。各シートの個々のセルのサイズを変更せずに、ワークシート内の印刷領域のサイズを変更するにはどうすればよいですか？エクセルvbaリサイズプリントエリア

2セントを提供できる方に感謝します。

出典

2012-03-01 thebiglebowski11

動作していないコードを確認すると便利です。あなたが何をしようとしているのか分かりません。マクロレコーダーも使用します。それをオンにし、適切な手順を踏むために必要な手順を実行し、有用なコードを生成する必要があります。 –

私はコードを持っていません。私はちょうど印刷できる情報の新しいワークシートを生成する優れたツールを持っています。しかし、新聞用紙のサイズは必ずしも適切ではありません。私は関数で各シートの印刷サイズを変更し、新しいページが作成されるたびにその関数を呼び出す必要があると思います。また、ページは新しいワークシートに1つずつ挿入されるため、各シートに複数の印刷可能なページがあります。私が印刷領域を一度しかできない場合は、そのシートのすべてのページを同じサイズにしますか？ – thebiglebowski11

私はあなたがなりたい場所をプログラム的にセルの範囲に印刷領域を設定する機能があなたを取得することを想定しています：

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

ActiveSheet.PageSetup.PrintArea = MyPrintArea

私が尋ねるに基づいて行うことができますベスト。

出典

2012-03-01 23:36:37 PatternMatching

PrintAreaは文字列なので、コードはActiveSheet.PageSetup.PrintArea = MyPrintArea.Addressにするか、範囲をバイパスして、ActiveSheet.PageSetup.PrintArea = "A1：G15" –

エクセルvbaリサイズプリントエリア

答えて

関連する問題