アクセスVBA画面のスクロールバーの調整方法

このQ&Aのポイント
  • アクセスVBAで作成したフォーム画面にサブフォーム画面を追加し、条件を入力するとデータが表示されます。しかし、サブフォーム画面のスクロールバーの表示が適切でないことがあります。特にデータが少ない場合でもスクロールバーが小さく表示され、データが多いように見えますが、スクロールバーをクリックすると適切な幅に調整されます。
  • フォーム画面で条件を入力すると、サブフォーム画面に表示されるデータが多い場合は、スクロールバーによって上下に移動できます。しかし、データが少ない場合でもスクロールバーの表示が小さくなり、データが多いように見えることがあります。ただし、スクロールバーをクリックすると適切な幅に調整されます。
  • アクセスVBAで作成したフォーム画面にサブフォーム画面を追加し、条件を入力するとデータが表示されます。しかし、サブフォーム画面のスクロールバーの表示が適切でないことがあります。特にデータが少ない場合でもスクロールバーが小さく表示され、データが多いように見えますが、スクロールバーをクリックすると適切な幅に調整されます。
回答を見る
  • ベストアンサー

アクセスVBA画面のスクロールバー

アクセスVBAで画面を作っており、 あるフォーム画面に、あるサブフォーム画面を付けてます。 フォーム画面に条件を入力すると、サブフォーム画面に データが表示されます。 サブフォーム画面はデータが多くなると、 スクロールバーで上下に移動できるようにしてます。 今、フォーム画面で条件を入れると、サブフォーム画面は さほどデータが多くなくても スクロールバーの移動する枠がとても小さく表示されます (あたかもデータがたくさんあるように) 但し、その時に、スクロールバーをクリックしたりすると すぐに適切なスクロールバーの幅になります。 フォーム画面で条件を入れた直後に サブフォーム画面のスクロールバーの幅を適切にしたいのですが 何か、特別な設定とか必要なのでしょうか?

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

  • ベストアンサー
  • yu_tang
  • ベストアンサー率81% (26/32)
回答No.1

レコード数を調べるにはコストがかかるので、 スクロールバーのつまみ部分の初期値は適当に 設定されています。 特に設定はありません。 いったん最終レコードへ移動すれば適切な高さに なります。

evaag777
質問者

お礼

ご回答ありがとうございます。 初期値は適当に設定されてるんですね。 諦めました。

関連するQ&A

  • ACCESSのフォームでスクロールバーを一番下に持っていくVBAの記入方法はありますか?

    ACCESSのVBAでスクロールバーを一番下に持っていくコマンドはありますか? 教えてください。ACCESSでフォームを作っています。 元となるフォームを「フォームA」として その中にサブフォーム「フォームB」があります。 フォームBについての質問です。 フォームAにメイン情報があり、フォームBは フォームAの関連情報が幾つかとうろくされています 1:Nの関係です フォームBは帳票フォームです。 レコードの新規作成のコマンド「DoCmd.GotoRecord acNewRec」 や 最終レコードへの移動コマンドでは カーソルが一番下に移動するのですが スクロールバーまで移動しないので 画面上変わらなく困っています。 実際の構成は フォームAで選択した顧客の情報が フォームBに日付ごと表示されています。 一画面に5レコード表示するようにしています(1:5) ここで6レコード目の入力のために レコードの新規作成ボタンや最終レコードへの移動ボタンを 作成したのですが、右側のスクロールバーが 動いてくれないので、カーソルだけ移動して 画面上は5レコードが表示されたままになっています。 分かりづらい質問で申し訳ありません なにとぞお願いいたします。

  • Access VBA サブフォームのサイズ変更

    Access の VBA についてご質問させていただきます。 親フォーム名:F05_親画面 サブフォーム名:F03_入力画面 サブフォームには、左からラベルが1列、テキストボックスが10列の計11列で、50行分配置されています。 つまり、11列 × 50行の表みたいにしてあります。 親フォームにスクロールバーを配置しており、親フォームのスクロールバーから入力画面を上下にスクロールできるようにしています。 サブフォームのテキストボックスに内容を表示したあと、 内容を表示した最後の行 +1から50行目までを非表示にしたのですが、 非表示にした場所にスクロールが出来てしまい、何もない画面が出来上がってしまいました。 何もない部分にスクロールできないようにしたいのですが、どのようにすればいいですか?

  • アクセスVBA フォームのスクロールバーを動かす。

    アクセスVBA フォームのスクロールバーを動かす。 作成したフォームの横スクロールバーポジションを、一番右端や左端にしてしまうことをVBA側でしたいのですが可能でしょうか? コードがわかりません。お願い致します。

  • エクセルのスクロールバーに画面がついていかなくなりました。どなたか教えてください。

    エクセルのスクロールバーを動かすと、シートの画面がそれに合わせて上下に移動していたのが、スクロールバーのところに行数を表示するだけで、スクロールバーに合わせての移動ができなくなりました。 戻す方法はありますか。どなたか教えてください。

  • アクセス フォーム画面でのスクロール

    アクセス2000・OSはXPを使っております。 画面に入りきらない大きさの帳票形式のフォームがあります。 下欄へ行くたびに、画面右のスクロールバーで移動するようにはしているのですが、ついくせでマウスのスクロールボタンを回して移動しようとしてしまいます。 そうすると画面が次のレコードに飛んでしまいます。 次のレコードへの移動を禁止する設定等はありますか?(できればマウスのスクロールボタンで同じレコード内を上下に移動したいです。)

  • AccessVBA サブフォームとスクロールについて

    こんにちは。 フォーム上にサブフォームを用意し、その中で横長のフォームを連続表示し、テーブルのデータを流し込み、あたかもデータベースのテーブルをそのまま見ているかのような構成にしています。実行すると、そのように見えます。 テーブルのレコードが多いものになると、マウスの上下スクロールをやりたくなります。しかし、マウスのホイールで上下スクロールすると上の行が隠れてしまい、なぜかスクロールしても最初の行が見えなくなってしまいます。こうなるとマウススクロールでの再表示はできず、画面上のスクロールバーの端っこの△▽をクリックして表示させています。 これでは操作性に難があります。 上記の現象の回避方法がありましたら教えてください。お願いします。 使用している環境はAccess2003です。

  • スクロールバーをVBAで操作したい

    エクセルの場合は、 Sub Macro1() ActiveWindow.SmallScroll Down:=100 End Sub でスクロールバーの位置をVBAで設定できますが アクセスのフォームのスクロール倍の位置をVBAで設定することは可能でしょうか?

  • Accessフォームのスクロールバーに関して

    こんにちは。Access2000を使用しています。 今回、データ照会用フォームを作成しようと思い、 タブコントロールの中にリストボックスを配置し、 条件に応じてそのリストボックスの値集合ソース (値集合ソースはクエリを使用し抽出条件として このフォームのテキストボックスに入力した値を使用) を変更してみました。 そのこと自体うまく言ったのですが、リストボックス につきものと思われるスクロールバーがでてきません。 (表示しきれない最後のレコードは途中で切られてみる ことができません。) どなたかスクロールバーを表示させていただけません でしょうか? どうぞよろしくお願いいたします。

  • 画面のスクロールについて

    現在、フォームが一画面では表示できずにスクロールバーを使って対応している状態です。(フォームの上にピクチャーを2枚貼り付けてそこに各コントロールを設置しています) スクロールバーを使えば問題ないのですが、タブを使って入力していった場合どうしても画面から見切れてしまいます。 タブの移動に合わせて画面も移動させたいのですがどういったプログラムをくむべきでしょか><お願いします!

  • accsesフォームのスクロールバーの作成方法の質問です。

    accsesフォームのスクロールバーの作成方法の質問です。 accessの初心者ですので、稚拙な文章になるかと思いますがご了承下さい。 現在Access2003にてフォームを作成しております。 対象となる画面にはラベルが表示されたりされなかったりするので、 そのラベル表示数に従って、スクロールバーを表示したいです。 イメージとしては、フォームの大きさは固定で その中に枠がありその中にのみラベルが表示されます。 その枠にスクロールをつけるような形です。 宜しくお願いします。