ベストアンサー

アクセス　モニタの大きさを取得したい

2013/03/14 21:16

いろんなパソコンで使うファイルがあります。 PCのモニタの大きさによって、フォームの大きさを調節したいのですが、まず、VBAでモニターの大きさ、インチなどを取得することは可能でしょうか？ＡＰＩを使えば可能ですか？コードを教えていただければ助かります。よろしくお願いします。

xiqixtoggw1
お礼率100% (38/38)

オフィス系ソフト
回答数1
ありがとう数1

みんなの回答 （1）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

nicotinism
ベストアンサー率70% (1019/1452)

2013/03/15 15:22 回答No.1

画面解像度を取得する http://www.moug.net/tech/acvba/0020033.html ということ？

質問者

お礼 2013/03/22 20:10

ありがとうございました。

関連するQ&A

モニタの高さを取得するには？　VBA

VBAでIEブラウザを操作していますが Set objIE = CreateObject("InternetExplorer.application") With objIE .Visible = True .Top = 0 .Left = 0 .Height = 700 End With としたときに、高さをモニタの高さを一致させたいのですがそういうことは可能ですか？モニタの高さを変数で取得してその値を .Height = i とやればいいと思うのですが、モニタの高さを取得する方法がわかりません。 APIを使うのでしょうか？
モニターが真っ暗で何も移りません

ノートパソコンに外部モニターを取り付けて使用していたところ、突然外部モニターが真っ黒になりました。その後放電をさせ、接続のコードなどを何度か付け替えましたが電源のライトが青く光るのみで何も表示されません。 PCの方では認識しているようなので、モニターが壊れてしまったのでしょうか？よろしくお願いします。モニター：SyncMaster 245B [24インチ] ノートパソコン：VAIO VPCSE28FJ　windows7
パソコンのモニターのサイズごとにホームページの画面を最適表示させる方法

モニターのサイズごとにホームページの画面を最適表示させる方法はどのようなものがあるでしょうか？ホームページの背景を一枚の写真で途切れなく使いたいと思い。 17インチのモニターでサイズを調節し、その後htmlファイルの背景としてプレビューしました。すると、17インチの画面では最適に表示されるのですが、別のパソコンを使い、15インチのモニタで表示すると画像が大きくなり過ぎ、画面に収まりきらなくなってしまします。逆に15インチのモニターでサイズを調節すると17インチの画面で見たときにサイズが小さすぎ写真につなぎ目が出来てしまします。どのような方法でも良いので一枚の写真を継ぎ目なく背景にし、それをモニターごとに最適に表示させる方法はありますでしょうか？
Access VBAでスキャナを操作したい

VBAでTWAINを直接操作してスキャナを動かしたいです。イメージ的にはフォームにボタンがあり、それを押すとスキャナがスキャンを開始するといった感じです。現在、APIをどのように扱ったらいいのかも、いまいち理解していません。どこかにTWAINを操作しているようなサンプルのコードがある場所を知りませんか？
デスクPC本体とモニタの接続コードがつながりません。

http://www.clevery.co.jp/pc/middle/100309.html ↑のPCとBenQ 19インチワイド液晶ディスプレイFP92W を買いました。ですが、パソコン本体に付属していたコードがモニタにつなげません。どうすれば良いでしょうか？他のコードを買ったほうが良いでしょうか？大変困っています。助けてください。
現在開いている全てのアクセスのファイル名を取得

現在開いている全てのアクセスのファイル名を取得することは可能でしょうか？ http://officetanaka.net/excel/vba/tips/tips61.htm のようにタスクマネージャーの一覧を取得してアクセスかどうかを取得するしかないでしょうか？しかしアプリケーションタイトルを設定してしまったのでアクセスは上記のvbaコードを実行しても「Microsoft Access」は取得できません。どうしたらよいでしょう？何か良い案はありますでしょうか？
システム起動時間を取得する事は可能でしょうか？

VBAにてシステム起動時間を取得する事は可能でしょうか？コマンドプロンプトでsysteminfoで取得される時間かタスクマネージャのパフォーマンスタブの起動時間に表示される時間を取得したいです。 APIを使えば可能なのでしょうか？コードがわかりません。ｗｉｎ８．１です。
モニタのサイズをVBAで取得することは可能ですか？

解像度ではなくモニタのサイズをVBAで取得することは可能ですか？ Declare Function GetSystemMetrics _ Lib "user32" _ (ByVal nIndex As Long) As Long Const SM_CXSCREEN As Long = 0 Const SM_CYSCREEN As Long = 1 Function myX() '画面の幅を取得 myX = GetSystemMetrics(SM_CXSCREEN) End Function Function myY() myY = GetSystemMetrics(SM_CYSCREEN) End Function で解像度は取得できますが、モニタのサイズによって動きを変えたいため、サイズを取得したいです。デスクトップPCにモニタを付けて使っています。
「サブフォーム」の名前を取得したい

アクセスのフォームの中にサブフォームが２つあります。このうちの一つのサブフォームをクリックした時に自身のフォーム名をVBAで取得したいのですが、サブフォームのモジュールで Debug.Print Screen.ActiveForm.Name をすると、親フォームが取得されます。 Forms("親フォーム").Controls("サブフォーム").Form.Controls("担当者").Value の部分の、「親フォーム」が取得されます。「サブフォーム」の部分を取得するコードはありますか？
【アクセス】最大値を取得したい

テーブルの番号フィールド（主キー、数値型）は1～100000くらいまでの番号が振られていますが 80%は空き番号です。（例えば3の次は100のような） VBAで1～100までのなかで最大値を取得したいのですがどうしたらよいでしょう？ 1 2 3 の次が 100の場合 4を最大値として取得するコードがあれば教えてください！宜しくお願い致します。
【Access2000】マシンIDの取得方法

1つのAccessファイルを複数人で利用するため、排他テーブルを作成しています。フォームを開いた時に、入力フォームに記載されている伝票番号を、排他テーブルに入力し、ほかの人が見た場合、編集できないようにしています。現在、排他テーブルには伝票番号の項目しかありません。あわせてどのマシンがその伝票番号を取得しているかを確認したいのですが、VBAでマシンIDを取得するにはどうすればよいでしょうか。もし何か方法があればお教えください。
サブフォームのコントロールの値を取得したい（ＶＢＡ）

連続投稿失礼します。ファーム１のなかにサブフォーム（フォーム２）を設置しました。フォーム２の中にはテキスト１があります。ＶＢＡでテキスト１の値を取得したいのですがうまくいきません。フォーム２を開いた状態で、 Sub test1() MsgBox Forms("フォーム2").Controls("テキスト1") End Sub を行なうと、「あああ」が返ってくるのですが、フォーム2を閉じて、フォーム１を開き、上のコードを実行すると、「マクロの式、またはVisual Basicのコードで参照されている 'フォーム２'フォームが見つかりません。」となってしまいます。普段はフォーム２は閉じ、フォーム1を開いて使うため、この状態でのＶＢＡコードが知りたいです。ちなみに変数を代入したいので「Form_フォーム2.テキスト1」の書き方よりカッコでくくる書き方でご回答いただければ助かります。よろしくお願いします。
パソコンのモニタを買い替えようと思ってるのですが、

パソコンのモニタを買い替えようと思ってるのですが、今の古いＰＣでも２０インチのスクエアのモニタはキチンと表示されますでしょうか？１９だと大丈夫なのは分かったのですが、どうせなら少しでも大きい画面が・・と思い、会社の２０インチと１９インチを比べてもやっぱり２０がいいのですが２０インチの最大解像度が１６００×１２００で、今のパソコンはその設定はないのですが、１０２４×７６８でも大丈夫ですか？ちなみにコントロールパネルからの設定では「1024×768、1280×720、1280×1024」の設定しかありません。 PC NEC VALUESTAR 型式PC-VT9003D CPU Pentium4 1.8GHz OS WindowsXP HomeEdition アドバイス宜しくお願いいたします。
Windws xp モニターサイズ

Windws xp入れたんだけど、モニターサイズどこで調節するんでしょうか？17インチディスプレイの真ん中よりになってノートパソコンみたくなってます。で、コンパネの画面の設定で画面の解像度は変えられるのですが、 17inchにぴったりと納まりません。他に設定するとこありますか？
デスクトップのモニターが映らない

３ヶ月ほどパソコンに触らなかったのですが、昨日電源を入れたらデスクトップタイプのモニターに電気が入りません。コードも外れていないし、モニターのスイッチも入っていますが全然動きません。どうも甥っ子がｐｃを使った後終了せずにコードを抜いただけだったようでコードを差し込んだらｐｃが動きました。これって関係あるのでしょうか？ｐｃは買ってから５年です。買いなおさなきゃダメなのかどうかわかる方お願いします。
モニターで？？？

同じPCでもモニタが変わると次のような現象が起きます。一つのモニタは17インチで1280*1024まで選べるのですがそうすると256色しか選べません。 1024*768だと16ビット 800*600だと32ビットを選べます。 15インチの方だと1024*768までしか選べませんが、 32ビットを選べます。 256色だとさすがに厳しいのですが、なんとかならないのでしょうか？今はわけあってSis530のPCを使っているのですが・・・
モニタがうつりません…

１年ほど前に、デスクトップＰＣと一緒に買ったAcerのLCDモニタがつかなくなってしまいました。問題が出てきたのは３日ほど前で、普段通りパソコンを立ち上げると、モニタがつかず、モニターの電源ランプも全く反応せず、音も出ません。電源コードがゆるんでるのかと思い、抜き差ししているうちに画面が出ました（ＰＣとの接続は問題ないようです）また、一度映ってしまえば、パソコンを終了させるまでは消えたりすることは無く、問題なく使うことが出来ました。ＰＣをつけるたびにこのような現象が起きるようになり、今日になって、何をやっても全くつかなくなってしまいました。配線、及びスイッチなどの間違いがないかは確認済みです。電源コードが壊れたのでしょうか、それともモニターの内部の問題でしょうか。買い換えるのにもお金がかかりますし、直るものなら直したいです。アドバイスをいただけると助かります。
｛アクセス｝全てのフォームの名前を取得したい

ひとつのＭＤＢファイルに入っている全てのフォームの名前を取得したいのですが Sub 全てのフォームの名前を取得() Dim i As Integer For i = 1 To Forms.Count Debug.Print Forms.Name Next End Sub このコードだとオブジェクトは、このプロパティまたはメソッドをサポートしていません。(Error 438) となってしまいます。どうすればいいでしょうかよろしくお願い致します。
AccessのVBAを開くには？

フォーム上をクリックするとVBAを開くコードを教えてください。
コンピューター名を取得したい

ExcelのVBAでネットワークのコンピューター名を取得することはできないでしょうか？知人がAPI関数ならできるかも。と言うのですができるのでしょうか？

アクセス　モニタの大きさを取得したい

質問者が選んだベストアンサー

お礼 2013/03/22 20:10

関連するQ&A

モニタの高さを取得するには？　VBA

モニターが真っ暗で何も移りません

パソコンのモニターのサイズごとにホームページの画面を最適表示させる方法

Access VBAでスキャナを操作したい

デスクPC本体とモニタの接続コードがつながりません。

現在開いている全てのアクセスのファイル名を取得

システム起動時間を取得する事は可能でしょうか？

モニタのサイズをVBAで取得することは可能ですか？

「サブフォーム」の名前を取得したい

【アクセス】最大値を取得したい

【Access2000】マシンIDの取得方法

サブフォームのコントロールの値を取得したい（ＶＢＡ）

パソコンのモニタを買い替えようと思ってるのですが、

Windws xp モニターサイズ

デスクトップのモニターが映らない

モニターで？？？

モニタがうつりません…

｛アクセス｝全てのフォームの名前を取得したい

AccessのVBAを開くには？

コンピューター名を取得したい

注目のQ&A

カテゴリ
一覧

専門家に質問してみよう
専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

アクセス モニタの大きさを取得したい

質問者が選んだベストアンサー

お礼 2013/03/22 20:10

関連するQ&A

モニタの高さを取得するには？ VBA

モニターが真っ暗で何も移りません

パソコンのモニターのサイズごとにホームページの画面を最適表示させる方法

Access VBAでスキャナを操作したい

デスクPC本体とモニタの接続コードがつながりません。

現在開いている全てのアクセスのファイル名を取得

システム起動時間を取得する事は可能でしょうか？

モニタのサイズをVBAで取得することは可能ですか？

「サブフォーム」の名前を取得したい

【アクセス】最大値を取得したい

【Access2000】マシンIDの取得方法

サブフォームのコントロールの値を取得したい（ＶＢＡ）

パソコンのモニタを買い替えようと思ってるのですが、

Windws xp モニターサイズ

デスクトップのモニターが映らない

モニターで？？？

モニタがうつりません…

｛アクセス｝全てのフォームの名前を取得したい

AccessのVBAを開くには？

コンピューター名を取得したい

注目のQ&A

カテゴリ 一覧

専門家に質問してみよう 専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

アクセス　モニタの大きさを取得したい

モニタの高さを取得するには？　VBA

カテゴリ
一覧

専門家に質問してみよう
専門家登録