- ベストアンサー
エクセルのズームボックスの倍率について
エクセルのズームボックス内にある、いくつかの倍率候補(プルダウンメニューによって表示される)を変更したいのですが、出来ますでしょうか。 操作方法分かる方ございましたら宜しくお願いします。
- みんなの回答 (4)
- 専門家の回答
質問者が選んだベストアンサー
Excelのデフォルトは変更できないようですので、自分で作成するのは いかがでしょうか。 1.[Alt]+[F11]で VisualBasicEditor を開き、[挿入]-[標準モジュール] で以下をコピペしてから、VisualBasicEditor を閉じます。 Sub Test() Dim CBC As CommandBarControl Set CBC = CommandBars.ActionControl ActiveWindow.Zoom = CBC.Caption End Sub 2.ツールバー・ユーザー設定のコマンドタブ内の「新しいメニュー」を ツールバー内にドラッグし、お好みの名前をつけます。 3.同ユーザー設定のコマンドタブ内の"マクロ"から、「ユーザ-設定」 を、上記作成のアイコン内にいくつかドラッグします。 とりあえず2個ドラッグしてみます。 4.それぞれのアイコンの右クリックから、以下のように設定します。 1)名前を変更します。 名前はすべて数字だけで、一方を 120 に、残りを 80 とします。 桁の少ない数字は先頭に半角スペースを入れ、桁揃いさせたほう がよいでしょう。 2)"テキストのみ表示"にします。 3)"マクロの登録"から、上記の "Test" を指定し、ユーザー設定を閉 じます。 作成したアイコンをクリックすると、それぞれの名前につけた倍率で ズームされるはずです。
その他の回答 (3)
- imogasi
- ベストアンサー率27% (4737/17069)
Sub Macro1() ActiveWindow.Zoom = 50 End Sub のようなコードををWorkbookOpenイベントに入れておくのは同ですか。 Private Sub Workbook_Open() ActiveWindow.Zoom = 125 End Sub もし指定した倍率が、用意されている倍率(200,100,75・・)なら、チェックボックスに黒丸も入るようだが。
補足
ご回答ありがとうございました。 マクロについては、よくわからないので後日、本でも開きながらやってみようと思います。
- hana-hana3
- ベストアンサー率31% (4940/15541)
そのボックスに数値を入力できますよ。(10~400)
補足
ご回答ありがとうございました。 説明不足で申し訳ありませんでした。 ボックスの数値すなわち規定値を変更したいのですが
- 1224jmm
- ベストアンサー率0% (0/6)
お疲れ様です。 そのボックス内を選択(反転)させてパーセンテージを入れなおせばOKだと思います。 もしくは【表示】→【ズーム】でパーセンテージを指定できます。
補足
ご回答ありがとうございました。 説明不足で申し訳ありませんでした。 ボックスの数値すなわち規定値を変更したいのですが
お礼
懇切な回答ありがとうございます。 Excelのデフォルトは変更できないのですね ご回答私には少々むずかしそうですが、一歩ずつやってみようとおもいます。ありがとうございました。