3.7 ワークブックのサイズ変更 エクセルの中に開いているワークブックウィンドウの大きさを変更したり、ウィンドウの位置を変更する方法です。 この操作は、対象のワークブックウィンドウ表示を通常表示（3.6 ワークブックを最大化、最小化参照）にした後、ActiveWindowの各種のプロパティを設定することで行います。 ワークブックの大きさを変えるためのプロパティ 以下の各プロパティで変更します。これらのプロパティは、値を設定するとウィンドウの大きさや表示位置が変わり、値を参照すると現在の表示位置や大きさを知ることができます。 ActiveWindow.Top ワークブックウィンドウの縦位置です。マイナス値も指定できます。 ActiveWindow.Left ワークブックウィンドウの横位置です。マイナス値も指定できます。 ActiveWindow.Width ワークブックウィンドウの幅です。9以上の値が指定できます。 ActiveWindow.Height ワークブックウィンドウの高さです。28以上の値が指定できます。 使用例 ワークブックウィンドウのサイズ変更例です。実行すると1番目のワークブックウィンドウが縮みます…（汗） なお、ウィンドウサイズを変更したいときは、ウィンドウの状態が通常表示であることが前提です。 Sub prcWorkbookWindowSize()     Dim lngHeight As Long     Dim lngWidth As Long     Dim lngTop As Long     Dim lngLeft As Long     Dim i As Long     '対象のワークブックを通常表示にします     Workbooks(1).Activate     ActiveWindow.WindowState = xlNormal     'ワークブックのウィンドウサイズを変更します     ActiveWindow.Height = 400     ActiveWindow.Width = 500     ActiveWindow.Top = 10     ActiveWindow.Left = 10     '設定した値を取得します     lngHeight = ActiveWindow.Height     lngWidth = ActiveWindow.Width     lngTop = ActiveWindow.Top     lngLeft = ActiveWindow.Left     For i = 1 To 20         'ワークブックウィンドウの縦位置変更         ActiveWindow.Top = lngTop         lngTop = lngTop + 4         'ワークブックウィンドウの横位置変更         ActiveWindow.Left = lngLeft         lngLeft = lngLeft + 4         'ワークブックウィンドウの高さ変更         ActiveWindow.Height = lngHeight         lngHeight = lngHeight - 8         'ワークブックウィンドウの幅変更         ActiveWindow.Width = lngWidth         lngWidth = lngWidth - 8     Next End Sub 　※これはエクセルマクロです

[PR]管理人が書いたVBAプログラミング本 ■最速攻略 Excel VBA サンプル大全集 ■苦手なコードもこれで安心!Excel VBA超入門講座 ■Excel VBAゲーム大作戦 はじめて編※ 実践編※ ◆ここが知りたかった! Access VBA 500の技※ （アマゾンへジャンプします。※は共著作品） エクセルマクロTips ブック・シート操作編 1.能書き（この章の説明） 2.基本オブジェクト   2.1 ワークブック（Workbookオブジェクト）   2.2 ワークシート（Worksheetオブジェクト）   2.3 その他のシートも扱う 3.ワークブックの操作   3.1 既存のワークブックやCSVを開く    ・Workbooks.Open   3.2 新規ワークブックを作る    ・まっさらのワークブック    ・テンプレートを使う   3.3 ワークブックの上書き保存    ・自分自身を保存する場合    ・他のワークブックを保存   3.4 ワークブックを別名で保存   3.5 ワークブックを閉じる    ・自分自身を閉じる    ・他のワークブックを閉じる    ・全てのワークブックを閉じる   3.6 ワークブックを最大化、最小化    ・ウィンドウを最大化、最小化、通常表示   3.7 ワークブックのサイズ変更    ・ウィンドウの縦位置、横位置、高さ、幅   3.8 シート見出しなどの表示・非表示    ・他に罫線、スクロールバー、行列番号    ・改ページ位置や、その他いろいろ   3.9 ワークブックを最前面に表示する    ・Activateメソッド 4.ワークシートの操作   4.1 ワークシートを選択する   4.2 ワークシートを追加する   4.3 ワークシートを削除する   4.4 ワークシートをコピーする   4.5 ワークシートを移動する   4.6 表示・非表示を切り替える   4.7 ワークシートの名前を変える ■ブック・シート操作編 ■セル・行・列操作編 ■Applicationオブジェクト・イベント編 ■応用技・その他編 Happy! Happy! Islandその他のコンテンツ ■VBAプログラミング、その他 　Access VBAプログラミング＆Tips 　Excel VBA(エクセルマクロ)プログラミング＆Tips 　VBScript＆JScriptプログラミング＆Tips for WSH 　プログラミング基礎・入門 　HTMLの書き方 ■ダウンロードコーナー 　AccessとExcelのフリーソフト ■コミュニティー 　VBA質問掲示板 ■その他 　オレの話を聞けぇ♪（仮称／コラム） 　管理人プロフィール 　管理人へメール ■別館(海外向けサイト) 　SAMURAI Game Center - Freeware games for Microsoft ACCESS and EXCEL! VBAプログラミング＆Tips集の "Happy! Happy! Island"トップページへ [リンク]IT関連情報サイトなど gihyo.jp 技術評論社提供のIT関連コンテンツサイト [リンク]一番クリックした国が優勝 ClickClickClick.com クリッカー＆認証人募集！日本を1位にしよう！もちろん、おいらも参加中！各種情報の入手はClickJapanオフィシャルサイトで。 [PR]証券会社・投資運用関連サイト カブドットコム証券 逆指値・W指値等の自動売買でリスク管理追求型の投資が可能！引け後のIRやニュースを見てからでも間に合う夜間取引も魅力！ マネックス証券 オンライントレード・自動売買の最先端！「逆指値・ツイン指値」でリスクコントロール！デイトレードなら片道手数料無料！ Ｅ＊トレード証券 オンライン専業証券�ｂPの口座数！業界最低水準の手数料体系と充実のサービスラインナップ！ 楽天証券のマーケットスピード ネット証券最強のトレーディングツール「マーケットスピード」でプロ水準の投資環境がご自宅のパソコンに！ オンライン証券徹底比較 価格．ｃｏｍで証券徹底比較！手数料、取引商品、信用取引金利、逆指値などの注文方法や提供情報などを徹底比較！

Copyright(C) 1999-2006 結城圭介。 All rights reserved