Access VBA DB（先頭の0値を消す方法）

お世話になります
AccessDBに社員管理番号があるとします
ID｜社員名｜社員管理番号｜
1 ｜太郎　｜001234　　　｜
2 ｜姫子　｜021023　　 ｜
3 ｜新免 ｜12330 |

上記のように決められた数値ではなく
（1～9)の数字より先に0値が存在する物だけ一括削除を実行させたいのですが、可能ですか？

Ver_Access2003
宜しくお願い申し上げます。

No.1 ベストアンサー 回答者： fumufumu_2006 回答日時： 2008/02/08 19:44

先頭の0を消すのか、先頭が0のデータを消すのか分からないのですが・・・

VBAではなくクエリです。

[社員管理番号の先頭の0を消す]
UPDATE テーブル1 SET 社員管理番号 = Trim(Str(Val([社員管理番号])));
とか
UPDATE テーブル1 SET 社員管理番号 = Val([社員管理番号]);

[社員管理番号の先頭が0のデータを消す]
DELETE FROM テーブル1 WHERE Left([社員管理番号],1)="0";

ではどうでしょうか？

No.2 回答者： Hayashi_Trek 回答日時： 2008/02/08 19:52

Access2000の方法ですが、Access2003でも同じだと思います。

文字列のフィールドに入っている数字文字列から、先頭の0を削除する方法です。
一旦、数値にしてからまた数字文字列にすれば、先頭の0が消えます。
１．クエリデザインで社員管理番号だけの選択クエリを作成します。
２．クエリメニューで上記のクエリを更新クエリに変更します。
３．更新の欄に、Cstr(Val([社員管理番号])) と入力する。
４．更新クエリを実行する。

間違いがあるといけないので、MDBファイルのコピーをとってください。