質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

ただいまの
回答率

87.78%

Access VBAでインポートした際にデータが全て取込まれない

解決済

回答 3

投稿

  • 評価
  • クリップ 0
  • VIEW 4,303

score 200

TransferSpreadsheetのacExportで出力したExcelファイルに1行追加し、
acImportでインポートしたときに追加した行がインポートされません。
例えば、10行のデータを出力しヘッダー込で11行がExcelに出力され、
12行目に新しくデータを追加してもインポート時は10行しか取込まれていません。
インポート時は

DoCmd.TransferSpreadsheet acImport, 10, テーブル名, ファイル名, True, シート名


で実行しており、特に何もおかしなことはしていないのですが、ピンと思い当たる方いませんでしょうか。。

  • 気になる質問をクリップする

    クリップした質問は、後からいつでもマイページで確認できます。

    またクリップした質問に回答があった際、通知やメールを受け取ることができます。

    クリップを取り消します

  • 良い質問の評価を上げる

    以下のような質問は評価を上げましょう

    • 質問内容が明確
    • 自分も答えを知りたい
    • 質問者以外のユーザにも役立つ

    評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

    質問の評価を上げたことを取り消します

  • 評価を下げられる数の上限に達しました

    評価を下げることができません

    • 1日5回まで評価を下げられます
    • 1日に1ユーザに対して2回まで評価を下げられます

    質問の評価を下げる

    teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

    • プログラミングに関係のない質問
    • やってほしいことだけを記載した丸投げの質問
    • 問題・課題が含まれていない質問
    • 意図的に内容が抹消された質問
    • 過去に投稿した質問と同じ内容の質問
    • 広告と受け取られるような投稿

    評価が下がると、TOPページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

    質問の評価を下げたことを取り消します

    この機能は開放されていません

    評価を下げる条件を満たしてません

    評価を下げる理由を選択してください

    詳細な説明はこちら

    上記に当てはまらず、質問内容が明確になっていない質問には「情報の追加・修正依頼」機能からコメントをしてください。

    質問の評価を下げる機能の利用条件

    この機能を利用するためには、以下の事項を行う必要があります。

回答 3

checkベストアンサー

+1

第6引数ですがExcelの範囲名を指定していませんか?シート名は最後に「!」をつける必要があったと思います。

投稿

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2019/01/29 10:48

    回答ありがとうございます。
    ご指摘通り、シート名の最後に「!」をつけることで正常に取り込まれました。
    特に範囲指定しておらずシート名だけの記載だったのですが、!をつけないといけなかったのですね。。。

    キャンセル

0

TransferSpreadsheetのacExportで出力したExcelファイルに1行追加し、

「この1行追加し」というのはユーザーがExcelファイルを開いて1行入力したということですか。それとも、VBAで追加したということでしょうか。
VBAで追加したのなら、そのコードも提示してください。

また、提示のコードは第2引数を数値で指定してますが、ここは名前付き定数で指定するようにしましょう。提示する場合はできる限り実際にものに近い形で提示してください。質問用に編集すると実際のコードに間違いがあっても指摘できません。

例えば、下記のように。

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12Xml, _
"t_個人情報", "c:\test\t_個人情報.xlsx", True, "Sheet1!"


ちなみに、シート名の最後の ! を省略しても問題なくインポートできるようです。
当方の実験ではできましたが、できないこともあるようですね。
実験コードを見直したら、!を付けてました。

投稿

編集

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2019/01/29 11:17

    回答ありがとうございます。

    >「この1行追加し」というのはユーザーがExcelファイルを開いて1行入力したということですか。それとも、VBAで追加したということでしょうか。
    →「ユーザーが出力したファイルを開いて、1行入力した。」ということです。

    >また、提示のコードは第2引数を数値で指定してますが、ここは名前付き定数で指定するようにしましょう。
    →こちらについてはコードそのままであり、数値で指定しておりました。
     ただし、「シート名」とかは変数だったりしますのでマスクするなど実際のコードになるように以後気を付けます、ご指摘ありがとうございます。

    >当方の実験ではできましたが、できないこともあるようですね。
    →インポート自体は出来ますが追加した行が「!」が無いときは取込めず、「!」がある時は取込めており、問題は解決しましたが結局何がいけないのかがはっきりしませんね。。
    本当に何も特別なことはしてない(つもり)なのですが。。

    キャンセル

0

第6引数で「シート名」を指定していますが、この引数は厳密には「シート名」を指定するのではなく「範囲(Range)」を指定する引数です。

最初にAccessからExportした際、Excelに出力したテーブル名のシートが作成され、そこにデータが出力されます。
それに加え、そのデータ範囲がExcelの「名前」にも追加されています。

例えば"DATA_01"テーブルから5列10行のデータを出力した場合、
・「DATA_01」シートにヘッダ込み11行のデータが出力される。
・「DATA_01!$A$1:$E$11」のデータ範囲が「DATA_01」という「名前」で追加される。
⇒「数式」タブの「名前の管理」で確認できます。

このシートからデータを取得する際に「DATA_01」という範囲を指定すると、シート名としての「DATA_01」よりも先に「名前」の「DATA_01」が優先して参照されるため、範囲が絞られたインポートになってしまいます。

回避策

回避策は
・「名前」としての「DATA_01」を削除する、または範囲拡張する
・Importの引数をシート名として判断させる
といったところでしょうか。

今回の場合はAccessVBAでの制御だと思いますので、前者のようにExcel側のデータをゴリゴリやるのは面倒かもしれません。

後者であれば、sousukeさんのアドバイスにある通り
DoCmd.TransferSpreadsheet acImport, 10, "Access側テーブル名", "Excelファイル名", True, "シート名!" 
のような形式で明示的に指定できます。

参考になれば幸いです。

投稿

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2019/01/29 11:25

    入れ違いですでに解決済みされていたようですね。よかったです。

    キャンセル

  • 2019/01/29 11:44

    回答ありがとうございます。
    仰るとおりでした、名前の管理でシート名と同名の定義が作成されており、その範囲をみたものと思います。
    範囲を指定することは認識しておりましたが、シート名を指定した場合はそのシートを対象に見る。と思ってました。
    また、名前が定義されていることは完全に認識外でした。
    とても勉強になりました、ありがとうございます。

    キャンセル

15分調べてもわからないことは、teratailで質問しよう!

  • ただいまの回答率 87.78%
  • 質問をまとめることで、思考を整理して素早く解決
  • テンプレート機能で、簡単に質問をまとめられる

関連した質問

同じタグがついた質問を見る