Q&A
> オートナンバー型の欠番を埋める
オートナンバーの主キー値はそのテーブルの中で一位にレコードを識別するだけのためのもので、それ以上のものでない、即ち欠番を埋めて連番にするようなことは考えもしないというのが普通だと思います。SELECT する際レコードに連番を振りたいというようことから「欠番を埋める」ということを考えているなら別の手段を考えることをお勧めします。
前提・実現したいこと
Microsoft Access初心者です。
Accessでのデータベース作成を学び始めたのですが、レコードを削除すると主キー設定されたIDフィールド（オートナンバー型）に欠番が発生してしまいます。
https://dekiru.net/article/14943/
こちらのサイトを参考に、手動で欠番をなくすことには成功したのですが、
これらの操作をVBAで記述、自動化したいと考えています。
下記コードでテーブルをデザインビューで開くところまではできたのですが、
・オートナンバー型フィールドを切り取り
→再度貼り付け
→主キーに設定
の記述方法がわかりません。
Excel VBAは数年使っていますが、Access VBAは全くの初心者＆情報が少なく、困っています。
Access VBAに詳しい方に、オートナンバー型フィールドの欠番埋めの書き方について教えていただきたく思います。
該当のソースコード
VBA
1Private Sub test_AutoNum() 2 3Dim Tbl As String 4 5'テーブルをデザインビューで開く 6Tbl = "test" 7DoCmd.OpenTable Tbl, acViewDesign 8 9 10End Sub
補足情報（FW/ツールのバージョンなど）
Windows11
Access 2021
そもそも欠番があっては困るものを主キーにしてはいけません。
振り直してもいい主キーなんて存在意義がありません。
ただの連番なら、読み出し時にアプリケーションで附番すれば済むことです。
その主キー、必要ですか？要らないですよね。
ということで、振り直しなんて覚えなくていいです。
お二方とも、ご意見ありがとうございます。
主キーの意義を勘違いしていたようです。確かに連番が必要であれば、一覧を読みだしたあと番号を割り振る、でも対応できますね。ありがとうございます。
回答1件
0
ベストアンサー
オートナンバー型というのは連番のための機能ではありません。主キーとして使えるユニークなキーを生成するためのものです。
データベースでは、主キーはいったん発行したら変更しないというのが、セオリーです。
主キーは他のテーブルから外部キーとしてリンクされたりしますので、それを変更したら、リンク先の外部キーも同時に変更する必要がでてきます。
もし、連番がどうしても必要なら、主キー（オートナンバー型）ではなく、主キーとは別に連番用のフィールドを追加するのがまともな設計になります。
参照先のように主キーを削除して、また、追加するなどいうのは、データベースとしてはありえません。
投稿2022/02/20 08:15
編集2022/02/20 08:16
総合スコア33715
主キーの基本的な役割、設計について教えていただきありがとうございます。
なるほど、主キーはそもそも連番として扱うべきではないんですね。勉強になりました。
あなたの回答
tips
プレビュー
