元のエクセルデータをよくよく見ると、「セル結合」されていました~。泣けます。
例えば、過去帳などで。見映えを良くするため?でしょうか「家などでセル結合」、、、これは、まともにデータが移りません。
そんな時は、まず、エクセルで、
(1)ID欄を作り、数字連番を全行に埋め込み
(2)セルを全選択で、セル解除
これを保存し、 アクセス にインポート
そうしますと、結合された部分は、一番上の行のフィールドだけ表示されているので、
(3)アクセスで更新クエリ
UPDATE Convert_old AS T
SET
T.氏名 = IIf(
Nz (T.氏名, "") <> "",
T.氏名,
DLookup (
"氏名",
"Convert_old",
"ID=" & DMax (
"ID",
"Convert_old",
"ID<" & T.ID & " AND Nz([氏名],'')<>''"
)
)
),
T.顧客コード = IIf(
Nz (T.顧客コード, "") <> "",
T.顧客コード,
DLookup (
"顧客コード",
"Convert_old",
"ID=" & DMax (
"ID",
"Convert_old",
"ID<" & T.ID & " AND Nz([顧客コード],'')<>''"
)
)
)
WHERE
Nz (T.氏名, "") = ""
OR Nz (T.顧客コード, "") = "";
のようなクエリーを書いて実行!!です。


コメント