• ベストアンサー

フォームの位置を設定するには。

フォームの表示位置はStartUpPositionで設定すると思うのですが、私が行いたいのはフォームをすべて画面の左上に合わせて表示したいのです。 Positionの値を3にすると少し左上が空いてしまいます。 (画面の解像度も考慮して左上いっぱいいっぱい使いたいのです。) Positionの値を0にするとtopやleftの値が何かの操作で変わってしまいます。 top=0,left=0をすべてのフォームに設定するにはどのような方法があるのでしょうか?教えてくださいませ。

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

  • ベストアンサー
  • todo36
  • ベストアンサー率58% (728/1234)
回答No.1

Private Sub Form_Load() Me.Top = 0 Me.Left = 0 End Sub とするのが確実です。

9766
質問者

お礼

助かります。 フォームやテキストの設定はプロパティ画面を使うことが多くて、コードをあまり書くことがなく、頭には全くありませんでした。 もっと細かなことを覚えなきゃ進歩しませんものね。 反省しました。 ありがとうございました。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • TAGOSAKU7
  • ベストアンサー率65% (276/422)
回答No.2

デザイン時にフォームのプロパティで Moveable = False にしてください。フォームの移動ができなくなります。 あとはtodo氏の要領で行うのが基本です。 private sub form_load()   me.left = 0   me.top = 0   me.width = screen.width   me.height = screen.height end sub 参考までに・・・ WINDOWSのMAXにするとフォームはLEFT-3 TOP-3だったかな? ちと今VB環境が無いのでチェックできませんが・・・ だから人によっては   me.left = -3   me.top = -3   me.width = screen.width + 6   me.height = screen.height + 6 とする人もいます

9766
質問者

お礼

わかりやすく説明くださいましてありがとうございます。 早速”参考”やってみます。

9766
質問者

補足

個人的には甲乙つけ難く、勝手ながら回答の早い方にポイントたくさんとなります。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • VB6.0で、フォームの表示位置を画面左上にしたいのですが。

    VB6.0で、フォームの表示位置を画面左上にしたいのですが、以下コードの「StartUpPosition」でエラーがでます。 コードが対応していないのでしょうか? ご存知の方教えてください。よろしくおねがいします。 Private Sub Form_Load() Me.Picture2.BackColor = vbWhite \'グラフ背景色 Me.StartUpPosition = 3 \'フォームを左上に表示 End Sub

  • Excel UserForm の表示位置

    Excel UserForm を選択セルの右下に表示させたいのです。 皆様こんばんわ。 セル選択を(例)B5:F5とし、右クリックでユーザーフォームを表示させているのですが 最後のセルF5の右下にユーザーフォームの左上がくる様な表示方法はあるのでしょうか? Set Area = Selection With UserForm1 .StartUpPosition = 0 .Top = 400 .Left = Area.Left + Area.Width .Show vbModeless End With などと行っていますが、エクセル画面の最大表示とそうでない場合とで表示位置が異なってしまいます。 ウィンドウズのエリアとエクセルのエリアで座標が異なるのかなぁと思いつつ。。。 良いアイデア(?)が浮かびません。 良い方法が御座いましたら 皆様、宜しくご教示願います。

  • コマンドボタンを押すと、ユーザーフォームが表示されるマクロを組んでおり

    コマンドボタンを押すと、ユーザーフォームが表示されるマクロを組んでおります。 このとき、ユーザーフォームの表示位置をあるセル(例えばE12)の隣にしたいのですが、 下記のマクロでは、画面をスクロールした場合に対応できません。 恐れ入りますが、ご教示いただけるとたすかります。。 Private Sub UserForm_Initialize() Me.StartUpPosition = 0 Me.Top = Application.Top + 180 Me.Left = Application.Left + 100 Me.Height = 80 Me.Width = 100 End Sub 投稿日時 - 2010-03-11 10:09:05

  • フォームの開く位置を揃えたい。

    フォームの開く位置の不揃いを改善する方法を知らないので、ご存じの方のご指導をお願いしたいと思います。 「フォームの設定」 フォームは全て「ポップアップ」設定にしています。 「改善したいこと」 コマンドボタンでフォームを開く時、フォーム毎に開く位置が違っていて違和感を感じています。開く位置をパソコン画面中央とかに揃える設定は可能でしょうか。 「実施していること」 フォームを修正した際、フォームを開く位置が極端にずれる時などは、フォームを中央にドラッグさせフォームの「タイトルバー」を「右クリック」し、表示されたメニューから「上書き保存」を選択し実行しています。 以上ですが、宜しくお願いします。

  • フォームの表示位置

    いつも拝見させていただき勉強しています。 VB初心者です。 親フォームから子フォームを、 loadメソッドとshowメソッドで、 よびだして表示させようとしているのですが、 フォームの位置をコントロールすることは できるのでしょうか? 画面中央に表示させたいのですが、 左上のほうに表示されてしまいます。

  • VB6.0でフォームをずらして表示したいのですが

    以下のコードを実行すると、メッセージボックスに10としか表示されません。 同じ場所にフォームが追加されていきます。 複数表示されているフォームを数える方法はないでしょうか? ご存知の方教えてください。 よろしくお願いします。 Private Sub CMD_drow_Click() Dim GraphForm As New Form2 Dim GraphNumber As Integer 'グラフカウント GraphNumber = Form2.Count MsgBox GraphNumber 'グラフ表示 GraphForm.Show '表示位置の設定 With GraphForm If GraphNumber <= 5 Then ' .StartUpPosition = 0 .Top = GraphNumber * 100 .Left = 0 Else ' .StartPosition = 0 .Top = (GraphNumber - 5) * 100 .Left = 300 End If End With End Sub

  • 「フォームが属する項目の」とは?

    エクセルです。 Private Sub UserForm_Initialize() Me.StartUpPosition = 1 End Sub Private Sub UserForm_Initialize() Me.StartUpPosition = 2 End Sub 二つの違いってなんでしょうか? どちらもフォームの中央に表示されるのですが。 http://www.officepro.jp/excelvbaform/form_form/index4.html を見ると、 1→フォームが属する項目の中央の位置。 2→画面全体の中央の位置。 とのことですが、「フォームが属する項目の」とはどういうことなのでしょうか?

  • ユーザーフォームのプロパティをVBAで設定したい

    いつも楽しく勉強させていただいております。 Excelのユーザーフォームを使い始めたところです。 コントロールのプロパティの設定を細かいVBAで行いたいのですが、方法がわかりません。 たとえばラベルの位置をそろえたいので 黒いラベル2.Left = 黒いラベル1.Left 黒いラベル3.Left = 黒いラベル1.Left といったコードを書いてUserForm_Initialize()で実行してみたのですが、フォームを閉じると元の値に戻っています。 どうすれば黒いラベル2と黒いラベル3の左端を黒いラベル1と同じにできますか。

  • iphone4sでのネットの画面戻り位置について

    iphone4sを使用しています。 yahooのニュースをよく見るのですが、 スマホ版の画面があまり好きではないのでPC版の画面でみています。 例えば、yahooトップ画面のニュースのリンクを開いて(この画面はスマホ版の画面だと思います)読んだあと、トップ画面に戻ると画面の表示位置が左上になってしまいます。 今までは3gsを使っており、ちゃんと最初に開いていた表示位置に戻っていました。 ニュースではなく、トップ画面下の方のリンクを開いて戻ってもやはり表示位置が左上になります。 使いにくいので、直したいのですが、設定等で直せないでしょうか? 教えていただけると助かります。 よろしくお願いします。

  • ウィンドウの位置を知りたい

    ウィンドウの現在位置を知る術はありますか? アプリケーションの左上隅が、Windows画面表示座標上のどこに位置しているのかを知るための方法が知りたいです。 (Windows画面表示座標という表現が正しいかどうかわかりませんが、画面左上を0,0とし、画面解像度によりますが、右下隅が1280,1024とか、そういう数値です。)