• ベストアンサー

Access2000のレコードの移動について

Access2000を使用しています。 データが50件ほど有り、単票形式でフォームを作成しています。 そこで、その単票形式のフォームに非連結のテキストボックスを入れて、そのテキストボックスに「3」などの数字を入れると、3件目のフォームにジャンプが出来るようなものを作りたいのですが・・・よろしくお願い致します。 (VBはほとんどわかりません)

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

  • ベストアンサー
  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.2

こんにちは。maruru01です。 DoCmdオブジェクトのGoToRecordメソッドで出来ます。 DoCmd.GoToRecord acDataForm, "フォーム名", acGoTo, Me!テキスト0.Value という風にします。 なお、テキストボックス入力値の整数チェック(変換)はして下さいね。

omusupa
質問者

補足

回答ありがとうございます。教えていただいたように入れていたのですが、次のレコードに移動されてしまいます。 ちなみに フォームの名前は "問題" テキストボックスの名前は"チェック" なのですが・・よろしくお願いします.

その他の回答 (2)

  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.3

No.2です。 >次のレコードに移動されてしまいます 当方では上手くいきますが。 コードはどのイベントに書かれていますか? あと、試しにフォームの移動ボタンを表示して、そのレコード番号と、テキストボックスに入力した値を比較してみて下さい。 同じになるはずです。

omusupa
質問者

お礼

入力する場所が間違っていました。無事出来ました。 ありがとうございました。

  • mshr1962
  • ベストアンサー率39% (7418/18948)
回答No.1

フォームの下の方に レコード|< < [ 1] > >| となった所がありませんか? ここの数字を替えれば指定のページに飛ぶと思いますが...

omusupa
質問者

補足

回答ありがとうございます。 しかし、移動ボタンを使って行う方法ではなく(移動ボタンは非表示にしてしまっています)、あくまでも、テキストボックスを使用したものを作りたかったので・・・ありがとうございました。

関連するQ&A

  • Access97 マウスホイールでレコード移動させない方法?

    Access97のフォームでマウスホイールを動かすとレコードが勝手に移動してしまいます。ジャンプでは無く、一レコードずつのスクロールです。ホイールを動かす向きに従い、先頭レコードまたは最終レコードへ移動します。移動中は、フォームの各コントロール値が目まぐるしく変化し、先頭か最終に到達するまでは、移動が止まりません。 移動は次の状態で発生します。 フォーム詳細部に設定したテキストボックスで且つフォーカスを取得しているボックス(カーソル点滅状態)にマウスカーソルを位置付けしてホイールを動かした時です。 テキストボックスがテーブルフィールドと連結・非連結に無関係に移動が発生します。 この移動を止める方法を教えて下さい。

  • Access2000でフォームにレコードを2件表示させる

    Access2000でひとつの単票形式のフォームの中にレコードを2件ずつ表示させることってできるのでしょうか?とっても困ってます。

  • アクセス フォーム単表形式について

    いつもお世話になります。 アクセスの単票形式フォームで、テキストボックスに数値を表示させています。タイマーで元データのテーブルを読み込んだ時に、最後に更新したテキストボックスがアクティブになっている(テキストボックス上でカーソルが点滅している)のですが、アクティブを解除する方法はありますでしょうか。

  • Access2000の入力桁制限

    Access2000を使用しています。 フォームにテキストボックスを作成しています。 テキストボックスに入力桁数を 制限をかけたいと思っています。 テキストボックスは非連結をしています。 どのように設定すればよいのでしょうか?

  • [Access]帳票フォームにて連続する非連結コントロールに個々の値を入れるには

    Accessにおいて。 帳票フォームの"詳細"に非連結のコントロール(例:テキストボックス)を配置し、それぞれ別々の値を持たせることは可能なのでしょうか? 例えば。 VBAにおいて、カレントレコードのAという値とBという値を計算し、その値を非連結のテキストボックスに挿入したとします。 単票フォームであれば、問題なくテキストボックスには計算後の値が表示されるわけですが…… 帳票フォームの場合では、"規定値"に計算式を入れたときと同様、先頭の値と同じものが連続するテキストボックスに表示されてしまいます。 これを回避し、計算後のデータを連続するテキストボックスにそれぞれの値として表示させるには、どのようにすればよいのでしょうか? もちろん、連結させたコントロールを使用すれば、問題はないのですが…… 状況によっては、これが行えた方が便利かと思い、質問させていただきます。 「帳票フォームでは不可能である」といった回答でもかまいません。 どうぞよろしくお願いいたします。

  • AccessのVBAにおいて,アクセスフォームに表示されている「値」を

    AccessのVBAにおいて,アクセスフォームに表示されている「値」を変数の中に格納したい。  例えば,オートフォームの単票形式でフォームを作成した場合,「番号」「製品」といったフィールドが2個あるテーブルを使うと,「番号」「製品」という名前のテキストボックスが2個ほどできます。 (フィールド名やテキストボックス名は問題ではありません。) このフォーム上に「ボタン」を配置し,このボタンをクリックした時に,「製品」というテキストボックスの内容を,メッセージボックスで表示させたい。 MsgBox (Me.製品.Text) と書いてもエラーとなります。 実際には,このフォームで欲しいデータを見つけた時,ボタンクリックで,テキストボックスに表示されている内容をグローバル変数に格納したいのですが,方法が分かりません。 Access 初心者です。どなたかよろしくお願いします。

  • 【Access2000】レコードの抽出方法

     Access2000を使用してデータベースを作成していますが、抽出条件でつまずいています。  具体的には、  【1】選択クエリーAを基に作成したフォームA(単票形式でレコードを1件ずつ表示)があります。  【2】フォームAの中に単票形式でレポートを出力するマクロボタンが有。  【3】現在はマクロボタンを押すとパラメータで「データNo.?」と入力してもらう形になってレコードを1件抽出する形になっています。    ※画面上に表示されている「データNo.」フィールドの数値を入力してもらう形です。  質問についてですが、今のところはパラメータを入力してもらいレコードを抽出→レポートを出力していますが、パラメータを使わず、現在、フォーム上に表示されているレコード(表示されている1件)を抽出する方法はないかと壁にぶち当たっています。  言い換えれば、レポートを出力する際の元になるクエリの抽出条件で「現在、表示されているレコード」をどのように記述すればいいか、もし御存知の方がいらっしゃいましたら御教示お願いいたします。

  • ウィザードでフォーム作成時のスクロールバー

    access2003です。  フォームを新規作成→オートフォーム(単票形式、表形式)→クエリもしくはテーブルの選択→OK をしたときに書式のスクロールバーが「あり」と「なし」のテキストボックスが作成されますが 何を基準に「あり」か「なし」かに判断されるのでしょうか? データの型なのかな?とも思ったのですが テキスト型でもある場合とない場合があります。 なんとなく入力されている文字が長いフィールドのテキストボックスにはスクロールバーがあります。 またデフォルトで全て「なし」で作成する方法はありますでしょうか? よろしくお願い致します。

  • Accessの再クエリについて

    Win2000、Access2000を使用しています。 1.すでに入力してあるデータ(Aフォーム、単票形式)の内容を変更して   「登録ボタン」をクリックすると再クエリを行う 2.「Bを開くボタン」をクリックすると、Bフォーム(単票形式)が開く 3.BフォームにはAフォームの変更が反映されている。 という流れにするため、Aフォームの登録ボタンをクリックしたら、再クエリをするようにVBを組みました。 AとBは、ID(オートナンバー型)でリレーションを組んでいます。 Aフォームは閉じないでそのまま表示させておき、Bフォームを開くボタンを作成しました。 ところが、再クエリをすると、1件目のデータを表示させてしまいます。 変更したフォームが2件目とか3件目であっても1件目を表示させてしまうので、変更したフォームを表示させたいんですが、どなたかおわかりになる方がいましたら、お教えください。 再クエリのVBは以下のとおりです。 Private Sub btn_登録_Click() Dim touroku As Integer touroku = MsgBox("このデータを登録しますか?", vbYesNo + vbQuestion, "登録") If touroku = vbYes Then DoCmd.Requery End If End Sub 説明がわかりずらくって申し訳ありませんが、よろしくお願いします。

  • アクセスで指定したレコードをフォームで開く方法?

    アクセスで、帳票形式のフォームで選択したレコードの内容を、詳細を表示する用のフォーム(単票形式)で開きたいのですが、どうしたらよいのでしょうか?(初心者です) 例えば、帳票形式のフォームで「予約番号:1」のレコード 選択した状態で、ボタンをクリックすると、 詳細を表示する用の単票形式のフォームの「予約番号:1」のレコードが表示されるようにしたいのです。 マクロでは出来なそうなので、VBAで・・・というところまでしか検討がつきません。 使用しているのはアクセス2002です。 どなたかご存知の方がいらっしゃいましたら、教えてください。よろしくお願いします。

専門家に質問してみよう