No.2ベストアンサー
- 回答日時:
こんな感じで行けます。
Sub test()
Dim objAcc As Object
Set objAcc = CreateObject("Access.Application")
objAcc.OpenCurrentDatabase ThisWorkbook.Path & "\" & "ImportTXT.Accdb"
objAcc.docmd.TransferText acImportDelim, "Sample インポート定義", "Sample", ThisWorkbook.Path & "\" & "Sample.txt", True
objAcc.Quit
Set objAcc = Nothing
End Sub
No.1
- 回答日時:
以下の手順で考えます。
1、エクセルで、テキストファイルを開く
この辺りは、マクロの記録でもコードが出来ます。
テキストファイル次第(CSVなのか?)
2、アクセスのデータベースへ接続する。
3、SQLのコードを実行してアクセスのテーブルの最後に追加していく。
https://ateitexe.com/access-database3/
の辺りを参考にしてみて下さい。
難易度は高いかもしれませんが、出来たら応用が利きます、
この回答へのお礼
お礼日時:2017/08/18 08:21
ありがとうございます。
Excelで読み込んで、Accessに追加する感じになるんですね。
Accessのインポート定義作成してあるので、それを使って直接インポート出来る物かと思ってました><
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・ハマっている「お菓子」を教えて!
- ・最近、いつ泣きましたか?
- ・夏が終わったと感じる瞬間って、どんな時?
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Wordの文章をExcelに内容ごとに...
-
アクセス2007でのインポートエ...
-
mdbをテキストに変換するツール...
-
Excelのデータ(数字)をテキス...
-
ACCESS CSV形式でエクスポート...
-
VBA 複数のCSVファイルを一度...
-
SQLSever 一括インポートについて
-
notepad++ で作成した文書を cs...
-
【Access】クエリで抽出...
-
CSVファイルでの数字表記のエラー
-
エクセル2000で65536行を超える...
-
複数のエクセルファイルをアク...
-
ACCESS でインポートフ...
-
【AccessVBA】ダイアログで複数...
-
Access CSVインポート フィール...
-
アクセスで小数点以下1桁まで...
-
多数のeml形式ファイルを1つの...
-
差し込み印刷の元データファイ...
-
ISOファイルとMDSファイル
-
EXCEL VBA 指定したファイルが...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Wordの文章をExcelに内容ごとに...
-
【Access】クエリで抽出...
-
Excelのデータ(数字)をテキス...
-
SQLSever 一括インポートについて
-
複数eml形式のBecky!への一括イ...
-
ダブルクォーテーション囲いカ...
-
Excelでhtml形式のテキストを表...
-
多数のeml形式ファイルを1つの...
-
アクセスで小数点以下1桁まで...
-
ACCESS でインポートフ...
-
エクセル2000で65536行を超える...
-
[VBA]csvファイルを開いて保存...
-
アクセス(ACCESS) インポート...
-
複数のメールファイルを1つの...
-
VBA 複数のCSVファイルを一度...
-
notepad++ で作成した文書を cs...
-
【AccessVBA】ダイアログで複数...
-
CSVファイルでの数字表記のエラー
-
列数が4000を超えるcsvファイル...
-
複数のエクセルファイルをアク...
おすすめ情報