OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
締切り
済み

度々すみませんがインポートのことで・・・

  • すぐに回答を!
  • 質問No.124200
  • 閲覧数104
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 76% (16/21)

度々すみません。
どうしてもお伺いしたいのですが

csvファイルのインポートを
コマンドボタンで行いたいのですが
「外部テーブルのファーマットが正しくありません」と
エラーが出てしまいます。
下記に何が問題あるのでしょうか、教えて下さい。

ちなみにファイル名はhead.csvでシート名もheadです。
インポートしたいテーブル名はheadです。

テーブルの形式はすべてあわせてあります。
テーブルをカラにしてみたり
ヘッダー部分のみの状態でも同じエラーでした。

Private Sub コマンド3_Click()
On Error GoTo Err_コマンド3_Click

Dim stDocName As String

stDocName = "マクロ1"
DoCmd.TransferSpreadsheet acImport, , "head", "C:\My Documents\hea
d.csv", True, "head"

Exit_コマンド3_Click:
Exit Sub

Err_コマンド3_Click:
MsgBox Err.Description
Resume Exit_コマンド3_Click

End Sub
----------------------------------------
OSは、Windows 98
アプリケーションは、Access 2000 です
----------------------------------------
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

回答 (全1件)

  • 回答No.1
レベル10

ベストアンサー率 31% (44/140)

cvsはExcelから作成したものですか? であれば、読み込みはは、cvsでなくExcelにしてください。 DoCmd.TransferSpreadsheet acImport, , "head", "C:\My Documents\hea d.csv", True, "head" とした場合は、Excel形式を想定しています。 ...続きを読む
cvsはExcelから作成したものですか?
であれば、読み込みはは、cvsでなくExcelにしてください。

DoCmd.TransferSpreadsheet acImport, , "head", "C:\My Documents\hea
d.csv", True, "head"
とした場合は、Excel形式を想定しています。
(acImportの後ろのパラメータが 形式指定です。省略時はExcel形式です。Excelとか1-2-3形式とcvs形式などあります。詳しくはAccess VBAのヘルプを参照してください。)
お礼コメント
taku0311

お礼率 76% (16/21)

ありがとうございました
いろいろと試してみて
TransferText acImportDelimでうまくインポートが
出来たのですが一点エラーが出てしまいます

フィールド型が違うとのエラーでインポートエラーになってしまいます
数値とアルファベットの混ざったナンバーなのでテキスト型にしているのですが
インポートしたときにどうしてか数値型に変わってしまいこのフィールドだけが
インポートされません。

どうすればいいのでしょうか?

On Error Resume Next
DoCmd.DeleteObject acTable, "head"
On Error GoTo 0

On Error Resume Next
DoCmd.DeleteObject acTable, "details"
On Error GoTo 0

DoCmd.TransferText acImportDelim, "", _
"user", "C:\My Documents\iモード受注\受注\user.csv", _
True, ""
DoCmd.TransferText acImportDelim, "", _
"head", "c:\My Documents\iモード受注\受注\head.csv", _
True, ""
DoCmd.TransferText acImportDelim, "", _
"details", "c:\My Documents\iモード受注\受注\details.csv", _
True, ""
End Sub
投稿日時 - 2001-08-28 12:40:57

このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
このやり方知ってる!同じこと困ったことある。経験を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ