- ベストアンサー
アクセス2003のサブフォームの値の代入
- みんなの回答 （3）
- 専門家の回答
質問者が選んだベストアンサー
単独で動いていたフォームをサブフォームとして組み込んだ時によく起きるものです。 メインのフォーム名を「M1」 メインフォームに配置したサブフォームコントロール名を「FSUB」 サブフォームにしたフォーム名を「S1」 と仮定します。 メインフォームに配置したサブフォームコントロール「FSUB」のプロパティ 「ソースオブジェクト」は、「S1」になっているとします。 また、サブフォームに配置したテキストボックス名を「S1txt」と仮定します。 テキストボックス「S1txt」へ値を代入する時には、 １）サブフォームにした「S1」を単独で起動している時、 アクション： 値の代入 アイテム： [Forms]![S1]![S1txt] 式： 2000 で代入できます。 ２）メインフォームを起動している時には、 アクション： 値の代入 アイテム： [Forms]![M1]![FSUB]![S1txt] 式： 2000 で代入できます。 つまり、サブフォーム化した際には、メインフォームから辿った記述にする必要があります。 サブフォームの組み込み方によっては、メインに配置したサブフォームコントロール名が サブフォーム名と一致する場合があります。 （この時にはサブフォームコントロール名「S1」ソースオブジェクト「S1」） この状態であれば、 アクション： 値の代入 アイテム： [Forms]![M1]![S1]![S1txt] 式： 2000 で値を代入することができます。 つまり [Forms]![メインフォーム名]![サブフォームコントロール名]![サブフォームのテキストボックス名] の参照になります。 正確には、最後の[サブフォームのテキストボックス名]は、 サブフォームコントロールに設定したソースオブジェクト内のテキスト名 になります。
その他の回答 (2)
- 30246kiku
- ベストアンサー率73% (370/504)
＃２です > 「オブジェクトを参照するときエラーが発生しました。 > 実行しようとしたvbモジュールでオブジェクトのプロパティまたはメソッドの参照 > が正しくありません。」と表示されます。 では、私には何も分かりません。（直接操作できていないので） 以下の手順で確認してください。 ・メインフォームをデザインビューで開き、プロパティを表示させます。 ・メインフォーム名を控えます。 ※A （プロパティにはありません。データベースウィンドウに表示されている名前です） ・サブフォーム部分を１回クリックします。 ・サブフォームコントロール名を控えます。 ※B ・サブフォーム内の値を代入したいテキストボックスをクリックし、名前を控えます。 ※C この時、 [Forms]![※A]![※B]![※C] でアクセスできます。 マクロ内の記述が、上記であるか確認します。 まだ、エラーが出るようであれば、 ※A、※B、※Bの時のソースオブジェクト名、※C と マクロの記述内容を提示してください。 また、単独起動でうまくいっている時のマクロの記述内容も合わせ提示ください。
お礼
ありがとうございます。 うまくいきました。 コントロール名が間違っていました。 アドバイス本当に助かりました。
- kmetu
- ベストアンサー率41% (562/1346)
もう少し具体的に書かないと良くわからない気がするのですが… サブフォームの指定が間違っているだけではないのでしょうか。
補足
すいません。説明不足で。 メインフォームA（顧客登録 単票形式） サブフォームB(顧客取引履歴） サブフォームBのレコードを入力する際にフィールドにイベントで検索用のフォームCを開くマクロを設定しています。 フォームCの値をサブフォームBのレコードに代入するマクロをイベントに設定して いるのですが、サブフォームBが見つからないというエラーになります。 どこの指定をみれば良いでしょうか？
関連するQ&A
- アクセス2003のサブフォームコントロールの参照について
アクセス2003で質問です。 メインフォームM１ サブフォームS１ サブフォームコントロールSCTL１ S1のフィールド T1と定義している場合に T1へサブフォームS1からオープンした別のフォームF1の値を代入したいのです。 マクロで値の代入の式を アイテムに [Forms]![M1]![SCTL1]![T1] と記述してもプロパティまたはメソッドが正しくないというエラーが表示されます。 同じ記述でアクセス2000では出来ました。 どこが違うのか教えて下さい。
- ベストアンサー
- オフィス系ソフト
- サブフォームをブランクで開きたい（値の代入）
現在、サブフォームを開く時に値の代入の後、DMax関数で+1をして最後のレコードに+1したIDをマクロで行っていますが、VBAでできないでしょうか？ １．サブフォームを開く Cmd Open フォーム名 ２．値の代入で（””）をいれフォームをクリア ３．値の代入でID=DMax"テーブル”+1 良い知恵があれば教えて頂けないでしょうか マクロにあまり頼りたくないので宜しくお願い致します。
- ベストアンサー
- その他(業務ソフトウェア)
- Accessのサブフォーム
Access2000です。 フォームを作成し、ツールボックスより「サブフォーム/サブレポート」をクリックしてサブフォームを配置しました。 イベントがEnterとExitしかないやつです。 検索するとサブフォームのテキストボックスが・・・とかあるのですが、何の事やら？です。 この、配置したサブフォームと検索すると色々ヒットするサブフォームは別物なのでしょうか？ このシンプルなサブフォームのソースオブジェクトにテーブルを指定して表示させています。 リンク子フィールドやリンク親フィールドは未設定です。 使い方が間違っているでしょうか？ このサブフォームの使い方がイマイチよく分かりません。 検索しても前述のように存在しないイベント（？）等の説明でさっぱりです。 分かりやすくどなたかお願いします。。。
- ベストアンサー
- オフィス系ソフト
- Accessのサブフォームについて
Accessのサブフォームのテキストボックスをクリックするとメインフォームのテキストボックスにサブフォームのテキストボックスの値を反映させるために以下のロジックを組み込んだ所エラーが発生してしまいました。 調べてみても分かりませんでしたので解決方法が分かる方は教えて下さい。 よろしくお願いします。 ロジック Form!メインフォーム!テキストボックス=サブフォームのテキストボックス エラー 「指定した式で参照されている’メインフォーム’フィールドが見つかりません」 「コントロールがフォーカスを取得していないときに、コントロールのプロパティまたはメソッドを参照することはできません」
- 締切済み
- その他（プログラミング・開発）
- ACCESS VBAサブフォーム(DATA SHEET)の値の取得方法
いつもお世話になっております。 ACCESS VBAでメインフォームに貼りついているサブフォームの値をとりたいのですが、うまくいっていません。 現状は module1でaをPublicで宣言 サブフォーム中のFORM_CURRENT()中で me.field1.setfocus a = me.field1.value として取得しています。 (実装ではメインのほうのボタンAを押したときに サブフォーム、FORM_CURRENT()で取得しておいた値を 別の変数に入れようとしています。) サブフォームのみで実行するとうまくいくようですが、 メインフォームに貼り付けるとうまくいかないようです。 (メインフォームに貼り付けて、サブフォームのFORM_CURRENTにブレイクを 貼って止めようとするが止まらない) そこでメインフォームボタンAクリックイベントで dim a1 as integer Forms![mainform]![subform].form.[field1].setfocus a1 = Forms![mainform]![subform].form.[field1].value として値をとろうと思ったのですが メインフォームからサブフォームにフォーカスをうつせない？ らしく、サポートされていませんの旨のメッセージがでてしまいます。 やりたいこととしては、メインフォームに貼りついたサブフォームの 選択レコードのフィールド値を、メインフォームのボタンを押したときに 取得する。ということなのですが、うまくいっていません。 別の方法でもいいので、実現方法をご存知の方、よろしくお願いします。 ちなみにACCESSは2000を使用、ADOはサポートされていますがDAOは 非サポートのようです。
- 締切済み
- Visual Basic
- Access 連結フィールド値を自動で表示
Accessでフォーム上にサブフォーム（データシート）を作成すると、 新規レコード欄にも自動的に連結フィールドの値が表示されます。 このサブフォームをメインフォーム上に作らずに、 コマンドボタンクリック時にあるフィールドが一致する（上記で言う連結フィールド）データを表示したサブフォーム（データシート）を開くかたちにしたいのですが、そうすると当然ながら新規レコード欄には連結フィールドの値は表示されません。 これをメインフォーム上にサブフォームを作った時と同じように、新規レコード欄に連結フィールド値を表示させるにはどうしたら良いでしょうか？ サブフォームを開く段階で新規レコードに結合フィールドの値を（VBAで）入力する事も考えましたが、そうするともしそこにデータを入れるつもりじゃなくても１つのレコードとしてデータが残ってしまいます。 メインフォーム上に作ったサブフォームなら、新規レコードに結合フィールドの値は表示されているものの、その他のフィールドにデータを入力しなければ１つのレコードとしてデータが残ることはありません。 こういう事が可能かどうかわかりませんが、ご存知でしたら教えてくださいませ。 よろしくお願いします！
- ベストアンサー
- オフィス系ソフト
- サブフォームに変数を代入し、RecordSourceの値を取得したい
サブフォームに変数を代入し、RecordSourceの値を取得したいのですがうまくいきません。 Sub test1() Dim サブフォーム As String Dim フォーム As String フォーム= "土台" サブフォーム = "フォーム1" MsgBox Form_フォーム1.RecordSource End Sub ******************************************************************* Sub test2() Dim サブフォーム As String Dim フォーム As String フォーム= "土台" サブフォーム = "フォーム1" MsgBox Form_フォーム1.RecordSource MsgBox Forms(フォーム).Controls(サブフォーム).RecordSource End Sub オブジェクトは、このプロパティまたはメソッドをサポートしていません。(Error 438) ******************************************************************* Sub test3() Dim サブフォーム As String Dim フォーム As String フォーム = "土台" サブフォーム = "フォーム1" MsgBox Forms(サブフォーム).RecordSource End Sub 実行時エラー'2450' マクロの式またはVisual Basic コート゛で参照されている 'フォーム名'フォームが見つかりません。 ******************************************************************* test1～3のうち test1のみはうまくいくのですが 変数を代入したいです。 ヘルフ゜のには Forms![受注]![受注サブフォーム].Formとなってますが これじゃ変数を代入できないですよね。 どうすればサブフォームに変数を代入しつつ、RecordSourceの値を取得できるのでしょうか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- ACCESSのサブフォームについて
ACCESSにおいて、サブフォームにデータを表示させた状態で、あるレコードをダブルクリックで選択させ、 そのデータ（対象レコード）をメインフォームに戻って使用させるにはどのようにしたらよろしいのでしょうか？ サブフォームの該当箇所に、ダブルクリック時イベントを貼り付けて、 制御をメインフォームへ移すのでしょうか。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Access2007でサブフォームを再クエリする
==環境== OS:Windows XP Professional Ver.2002 Service Pack 3 Access 2007 マクロを使って下記の操作をしようとしています。 以前Access2000を使っていて使用できたマクロが、Access2007では動かなくなってしまいました。 このマクロをどう修正したらいいのかわかりません。 [1]フォームAに作られた一覧表（テキストボックスを使って表示している） ----------------------------------- 品名------金額a-----金額b-----合計 製品1----5000-------6000@------11000 製品2----4000-------3000-------7000 ----------------------------------- [2]そのうち明細が見たい箇所のテキストボックスをクリック ※この場合、製品1の金額bの明細を表示させたいので `@マークが付いているテキストボックスをクリックしています。 [3]サブフォームを持つフォームBが開く [4]フォームBの検索条件 テキストボックスの『品名検索欄』に「製品1」を入力 オプショングループの『金額区分』の「b」がON [5]フォームBを再クエリ ※フォーム上には再クエリボタンが設置されています。 サブフォームは「sub_form」という名前で配置されています。 ==2000でのマクロ== [3]から[5]について、以下のように作成しています。 (1)フォームを開く ・フォーム名：フォームB (2)値の代入 ・アイテム：[Forms]![フォームB]![品名検索欄] ・式：[Forms]![フォームA]![品名] (3)値の代入 ・アイテム：[Forms]![フォームB]![金額区分] ・式：2 (4)キー送信 ・キー操作：+{F9} ・待機：いいえ ==2007での状況== 2000で作成したマクロをそのまま使うと(4)が動かないようです。 フォームB上では品名と金額区分が入力されており、 サブフォームに表示されるはずのデータは空です。 フォームB上の「再クエリ」ボタンを押すとデータが表示されました。 試しに(4)キー送信を再クエリ（コントロール名：sub_form）に変えたところ 「カレントレコードには'sub_form'という名前のフィールドはありません。」 と表示されてしまいました。 このマクロをどう直したらいいでしょうか。 皆さん、よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- Accessのサブフォームについて
メインフォームとサブフォームのあるフォームを作成しました。メインフォームを入力してから、サブフォームを入力し、次のレコードへ移動するのにメインフォームの移動ボタンを押すと、次のレコードのカーソルがサブフォームのフィールドへ移動します。メインフォームに移動する方法はありませんか？
- ベストアンサー
- オフィス系ソフト
補足
回答ありがとうございます。 やってみたのですが今度は 「オブジェクトを参照するときエラーが発生しました。 実行しようとしたvbモジュールでオブジェクトのプロパティまたはメソッドの参照 が正しくありません。」と表示されます。 あとどこが違うのでしょうか？ 初歩的なことかも知れませんがよろしくお願いします。