![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
いつもお世話になっております。
また、ご助言お願いします。
WIN7
ACCESS2010
工事台帳を作成しております。
親フォーム[F顧客入力]
顧客ID(主キー)
顧客名
顧客住所等、顧客に関する基本事項
子フォーム[F現場CD](顧客IDでリンクさせて親フォームに埋め込み)
作成日
得意先CD
現場CD(以前、質問させていただいた複雑な自動採番)(主キー)
備考等
一人の顧客に対して、社内の複数部門が携わる事があるので
一つの現場CDごとに工程管理や詳細を記入する [工事詳細]という
フォームを開き、リンクさせたいのですがうまくいきません。
具体的には、子フォーム内に[詳細入力]というボタンを作り
Private Sub コマンド詳細入力_Click()
DoCmd.RunCommand acCmdSaveRecord
If IsNull(Forms![F顧客入力]![現場CD].[Form]![現場CD]) Then Exit Sub
DoCmd.OpenForm "F工事詳細", , , "現場CD ='" & Forms![F顧客入力]![現場CD].[Form]![現場CD] & "'"
End Sub
「フィールド'現場CD'とキーが一致しているレコードをテーブル'T現場CD'で探すことができません」
というエラーがでます。
都度、手入力で現場CDを入力させればよいのですが...。
現場CDでリンクさせ、別フォームを開くようにしたいです。
(フォームヘッダー部分に現場CDと顧客名を表示できるようにもしたいので)
どうかご助言お願いいたします。
No.1ベストアンサー
- 回答日時:
> 具体的には、子フォーム内に[詳細入力]というボタンを作り
ということなので、自分のフォームにあるものを参照する時には Me が楽です。
また、レコードを確定後でも何らかのエラーで確定できていない時もあるので Dirty 判別を入れておいた方が良いかも・・・
Private Sub コマンド詳細入力_Click()
DoCmd.RunCommand acCmdSaveRecord
If (Me.Dirty Or IsNull(Me.現場CD)) Then Exit Sub
DoCmd.OpenForm "F工事詳細", , , "現場CD ='" & Me.現場CD & "'"
End Sub
として、どうなりますか
なお、上記のフォーム起動の方法では、Filter をかけて絞り込むものとなっているので、
「現場CD」がレコードソース上で得られている必要があります。
ただ「現場CD」を渡せれば良い・・・場合は、引数 OpenArgs 部分を使って受け渡しします。
(ヘルプに例があったと思います)
この回答への補足
30246kiku様
お礼とご報告が遅くなりました事をお詫びいたします。
ご助言いただきましたとおり、試しましたがうまくいかず、
試行錯誤を繰り返していました。
本日、フォームを構成するクエリを変更したところ
うまくいきました。
が、詳細をクリックするとパラメーターを求められます。
無視して、空白のまま進めると(ENTERキー)希望通りの
結果が出ています。
補足の件ですが、自己解決できました。
お礼が大変遅くなりまして大変申し訳ございませんでした。
これで、次の作業に取り掛かることができます。
この度は、どうもありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Access IF文でテーブルに存在しない場合の処理について 2 2022/10/10 18:09
- Access(アクセス) Accessテーブルの結合で別々のテーブルのフィールドを組み合わせて値を出す方法について 2 2022/07/20 19:43
- その他(データベース) accessについて 2 2022/05/31 16:58
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- 経営情報システム accessでの請求管理について 12 2022/06/11 16:20
- Access(アクセス) Accessフォームで複数条件でフィールドの値を表示する方法 4 2022/07/21 10:47
- 政治 日本で訴訟件数が少ないのは、自民党とビッグモーターが詐欺組織だからですか? 2 2023/07/27 11:30
- Excel(エクセル) エクセル 多数のファイルから値を抜き出したい 4 2022/12/12 16:49
- JavaScript 空白で入力フォームのボタンをクリックしたら、ブラウザの上部からjavascriptで 表示されるアラ 1 2022/05/20 11:16
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
子フォームから別(孫)フォー...
-
ワードで保存するファイル名の...
-
アクセスで同一テーブル内への...
-
Access 既に開いているフォー...
-
シングルクォーテーションとダ...
-
Access レコードロックについて...
-
Accessで名寄せグループの関係...
-
access、パラメータの順番を並...
-
Excelを8名で共有し、顧客デー...
-
データベースの1要素に複数デー...
-
Access クエリ このレコードセ...
-
テーブル1 2 3 の結合
-
Excel 2019 のピボットテーブル...
-
Oracle 2つのDate型の値の差を...
-
エクセルVBAで5行目からオート...
-
Accessのフィールド数が255しか...
-
Accessでテーブル名やクエリ名...
-
Accessでコードを入れると名前...
-
ORACLEでLONG項目からCHAR項目...
-
Accessでテーブルの値をテキス...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
データベースの1要素に複数デー...
-
Access VBAでクエリーのレコー...
-
Access IF文でテーブルに存在し...
-
Access フォームのデータがテー...
-
顧客IDを入力すると顧客名や住...
-
ACCESS で マクロの中でフィ...
-
ワードでの単純作業の効率化に...
-
ワードで保存するファイル名の...
-
シングルクォーテーションとダ...
-
Access 縦(行)のデータを横(列)...
-
別のDBからテーブルをコピーす...
-
Access 既に開いているフォー...
-
Access2000 単票フォーム上の...
-
Accessデータベースで行と列を...
-
文字化け、記号の含まれるフィ...
-
Accessで名寄せグループの関係...
-
Access レコードロックについて...
-
ACCESSで重複したデータがある...
-
【続続】Access2002で連番のつ...
-
Access クエリ このレコードセ...
おすすめ情報