No.1ベストアンサー
- 回答日時:
APIで画面解像度を得て、変更するしかないと思います。
参考URLは、アクセスでの例になっていますが、EXCELでも同じソースで可能です。(Excel2002で検証)
http://www2.moug.net/cgi-bin/technic.cgi?acvba+T …
Declare から End Function までコピーして、変更するロジックを記述します。
例えば、
Sub test2()
Dim wrkw As Long, wrkh As Long
wrkw = GetWindowSize.Width
wrkh = GetWindowSize.Height
If wrkw = 1024 And wrkh = 768 Then
ActiveWindow.Zoom = 100
End If
If wrkw = 1280 And wrkh = 1024 Then
ActiveWindow.Zoom = 80
End If
If wrkw = 800 And wrkh = 600 Then
ActiveWindow.Zoom = 120
End If
End Sub
参考URL:http://www2.moug.net/cgi-bin/technic.cgi?acvba+T …
No.2
- 回答日時:
先日も似たご質問されてましたね。
API関数「GetDesktopWindow」でWEB照会して見てください。結構沢山出てきます。
例えば
http://www2.moug.net/cgi-bin/technic.cgi?acvba+T …
など。
この回答へのお礼
お礼日時:2004/06/07 09:52
前回教えて頂いたのを、元にやってみたのですが具体的な数値がうまく取れなかったもので・・・
教えて頂いたwebを覗いてみましたが非常に参考になりました。ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- iPad iPadでWebサイトで選択した文から「ユーザー辞書」を押しても登録画面が出ない 1 2022/08/11 19:56
- Windows 7 Windows画面表示について 3 2023/04/23 11:50
- Visual Basic(VBA) ChatGPTに作らせたい Excel VBA 1 2023/04/05 19:56
- モニター・ディスプレイ NVIDIA Geforce GT 710の解像度設定について教えて下さい 3 2022/06/19 13:00
- デスクトップパソコン パソコン マルチスクリーン 3画面 全画面表示で動画を楽しみたい。 2 2023/07/21 08:40
- フリーソフト libreoffice drawのツールバーのチェックが外れてしまう 1 2022/10/04 22:02
- Visual Basic(VBA) EXCEL VBAで NHK NEWSの NEWSデータ内容取得が できない 1 2023/04/09 12:26
- 格安スマホ・SIMフリースマホ Xiaomiのスマホでスクリーンセーバーの設定 1 2022/03/23 06:51
- モニター・ディスプレイ PCのマルチディスプレイで複製はできますが拡張ができません 1 2023/08/09 01:29
- モニター・ディスプレイ WQHDのモニターにフルHDの解像度で表示させた時の見え方 5 2022/08/31 15:44
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
パソコン画面がすべて縮小され...
-
パソコンの画面が半分しか表示...
-
画面のズレの直し方。
-
Windows2003 Server解像度の変更
-
WEBページの文字が細くて見にく...
-
PC起動時のロゴが横長に
-
解像度を1920×1080に変更したい。
-
画面のすべての文字が大きくな...
-
画面が横伸び・文字ギザギザ・...
-
PCの画面をフル画面にすると、...
-
Windows 7 の画面解像度の変更...
-
同じWebサイトなのにPCによって...
-
デスクトップのアイコンの文字...
-
知らぬ間に,アイコンが巨大化...
-
モニター解像度を上げる方法
-
もとにもどらないよう!
-
TLSの設定について。
-
IMEオプションが開かない
-
Windows Media Player 11 で歌...
-
デスクトップ画面を初期画面に...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
パソコンの画面が半分しか表示...
-
画面のズレの直し方。
-
パソコン画面がすべて縮小され...
-
突然画面表示が大きくなって戻...
-
マルチディスプレイの段差移動
-
ペイントの文字入力
-
Windows 10 で、jpegの解像度(d...
-
画面に出ていない部分もプリン...
-
VM VirtualBox→XPを高解像度...
-
バッチファイルでの解像度変更
-
画面の解析度って何ですか?
-
解像度が荒くなるキーボードシ...
-
解像度を1920×1080に変更したい。
-
縮小専用は解像度も変わる?
-
WEBページの文字が細くて見にく...
-
画面が全体的に小さい
-
WindowsのPrintScreenの解像度
-
壁紙の画像がサイズが合ってて...
-
ExcelのVBAでユーザーの画面解...
-
画面がはみ出てしまいます。
おすすめ情報