|
▼小僧 さん:
回答ありがとうございます。
コードがおかしくないとのことで、オプション値を確認したら・・・間違ってました^^;。
よーく確認して投稿したつもりですが、そそっかしくて申し訳ないです。
お騒がせしました。
そして、ありがとうございました。
>>Select Case Forms!F_コメント入力!フレーム33
>> Case 1
>> DoCmd.GoToRecord , , acNewRec
>> …
>> Case 2
>> DoCmd.GoToRecord , , acNewRec
>> …
>> Case 3
>> DoCmd.GoToRecord , , acNewRec
>> …
>> End Select
>
>せっかく Case 文 を使われてるのですから、
>Case内で同じ処理をするのであれば外に出してしまった方が良さそうですね。
最初selectcaseとcase1の間に出したらエラーが出ましたが、位置を変えたらうまくいきました。(いまいちどこに書けばどこの範囲に影響するかわかってなくて・・。)
ありがとうございます。
>
>
>> DoCmd.OpenTable "T_コメント", acNormal, acEdit
>> DoCmd.Close acTable, "T_コメント"
>
>F_コメントリストが連結フォームだと思われるので、
>T_コメントを Open/Close しないでも大丈夫ですね。
>
以前使ったコードやサンプルをコピーして少し書き換えて・・というような感じでやってますので、無駄に記述していることが多いようです。ご指摘ありがとうございます。
>これは意見が分かれる所なのですが、正規化した方が良さそうですね。
>
>T_コメント区分マスタ
>コメント区分コード コメント区分
>1 指導
>2 再検査
>3 治療
>
>
> T_コメント
> コメント区分コード コメント番号 コメント
> 1 1 ○○に注意しましょう。
> 1 2 ○○を控えましょう
> 2 1 ○○の検査を受けましょう
> 2 2 ▲▲の検査を受けましょう
> 3 1 ○○の治療が必要です。
> 3 2 ▲の値について○○の治療を受けてください。
>
>
>の様にして、クエリで両テーブルを結合したものを
>フォームのレコードソースにする事をお勧めします。
参考にします。
本当にありがとうございました。
|
|