オートナンバー型の欠番を直すには?
はじめに
レコードを何件か削除すると、欠番になってしまいます。この番号を振りなおすにはどうすればいいのでしょうか?
どうしても欠番が気になるようでしたら、最初からオートナンバー型は使わないことです(キッパリ)。
Accessのバリバリ開発者レベルの方は欠番が出たりするのがわずらわしいのでオートナンバー型は使わないようにデータベースを構築していますね。
欠番をなんとか穴埋めするのに一番難儀なのが、データベースにデータが結構あって、リレーションシップとかが設定されていて、そのID番号が他のテーブルの外部キーとして参照している場合です。これはもう悲惨、私ですらお手上げです。方法はないわけでもないですが、かなり時間と労力を必要とします。
-
修正したいテーブルを選択して[編集]→[コピー]をクリックします。
右クリックしてショートカットメニューより[コピー]を選んでも、Ctrl+Cキーでコピーしてもいいのでとにかくコピーしてください(笑)
- [編集]→[貼り付け]をクリックすると、[テーブルの貼り付け]ダイアログボックスが表示されます。

テーブル名を適当に入力して、貼り付けの設定を「テーブル構成のみ」にしてOKボタンをクリックします。
すると、データ抜きの構造のみが作成されました。
-
クエリを新規作成します(要はテーブル作成クエリなのですが(^^;)
元となるデータベースは欠番を直したい元テーブルを選択してとりあえず選択クエリを作ります。ただし、オートナンバー型のフィールド以外のすべてのフィールドを選択してください。
- [クエリ]→[追加]をクリックします。
-
するとこんなんでてきます。追加先のテーブル名は、テーブル構造のみ作成したテーブル名を選択して、OKボタンをクリックします。

- [クエリ]→[実行]をクリックするか、ツールバーの「!」マークボタンをクリックします。
-
すると、テーブル構成のみ作ったテーブルにデータが書き込まれました。欠番が修復されたことを確認します。
-
元のテーブルを削除して、更新されたテーブルの名前を削除したテーブル名に変更します。
テーブルにデータが空で、1から始まらなくなった場合は、データベースの最適化をすれば大丈夫です。
→データベースを最適化するには?を参照してください。
参考:
問題は解決しましたか?
操作方法、設定方法等で困ったら、Microsoft Office
Users Forum に質問してください!
Accessに関する人気ページ
- [Access 2000] レポートを作ってみよう! Part 1
- Microsoft Access FAQ -
テキスト型のフィールドを数値に変えて計算したいんだけど
- [Access 2000] フォームを作ってみよう! Part 2
- [Access 2000] クエリの条件設定について Part 1
- Access 2003:Accessって何?
- [Access 2000] デザインビューでフォームを開いてみよう!
Part 1
- [Access 2000] 顧客管理データベースを作ってみよう!
- [Access 2000] クエリを作ってみよう! Part 1
- [Access 2000] 演算フィールドを作ろう! Part 1
- Microsoft Access FAQ - フォームを常に最大化して開くには?
▲このページのトップへ