アクセスでの回数の表示

質問

アクセス2002　　XP

フィールド名
姓・名
シリアルNO
サブNO
とあります。
シリアルNOは0001・0002.と続いていくのですが、
シリアルNO0001・Aさん・サブNO 01
このAさんというのは何回も出てくるのです。そこでサブNOで2回目Aさんを入力したときにサブNOに自動的に02・3回目で03と入力されるようにしたいのですができますか？
これもできたらうれしいんですけど、2回目にAさんと入力したら、シリアルNOに同じ0001が入力される。
自分なりにイロイロ試してみたのですがなかなかうまくいかず　アドバイスよろしくお願いします。

回答No.1

maruru01 · ベストアンサー

こんにちは。maruru01です。

姓名を入力するテキストボックスの適当なイベント（ChangeかExitかAfterUpdateあたりかな）に、

If DCount("姓・名", "テーブル名", "姓・名 = '" & Me!姓・名.Value & "'") > 0 Then
　　Me!シリアルNO.Value = DLookup("シリアルNO", "テーブル名", "姓・名 = '" & Me!姓・名.Value & "'")
　　Me!サブNO.Value = Format(DCount("姓・名", "テーブル名", "姓・名 = '" & Me!姓・名.Value & "'") + 1, "00")
End If

という感じかな。
DLookup、DCount関数については、ヘルプなどを参照して下さい。

お礼

遅くなり申し訳ないです。
上記のように試してみたら見事に成功しました！！！
有り難うございます。

maruru01にはいつも助けていただいてます！！

またよろしくお願いします。
今すでにほかの件で悩んでます(^_^;)