スキルアップ・問題解決なら、モーグにおまかせ！

 
いつもお世話になっております。
 
ACCESSにてテキストファイルを取り込み、件数をメッセージボックスで表示、
1行目はヘッダーなので取り込まないようにしようとしているのですが、
 
HasFieldNamesでFalseを指定しているのですが、ヘッダーが取り込まれます。
 
また、件数表示が実際は1000件ほど取り込んでいるのですが、「0件を
取り込みました」と表示されてしまいます。
 
具体的な対応策がわからず困っております。ぜひご教示のほど、よろしくお願いします。
 
 
Private Sub コマンド43_Click()
Dim ファイル名 As String
Dim cnt As Long
ファイル名 = "C:\ファイル名.csv"
DoCmd.TransferText acImportDelim, , "取込テーブル", ファイル名, False
MsgBox "ファイル名データから「" & cnt & "件」を取り込みました"
End Sub

＞HasFieldNamesでFalseを指定しているのですが、ヘッダーが取り込まれます。
 
HasFieldNames ←ヘッダがある
ですから True を指定しましょう。
 
＞「0件を取り込みました」と表示されてしまいます。
 
件数を取得する処理が何も書かれていません。

ご回答ありがとうございます。
Trueを指定したところ、「〇〇がみつかりません」というエラーとなって
しまいました。
これは、定義を作っておかなければいけないということでしょうか。
ヘッダーにブランク行があり、ヘッダー有で取り込むとヘッダー部分の
取込エラーとなり、ヘッダー無しで取り込みがしたいというのが目的に
なります。
 
お手数ですがご教示のほど、よろしくお願いします。
 
※定義を呼び出す形にする。
集計については取り込んだテーブルのデータ数をカウントするようにできました。
cnt = DCount("*", "取込テーブル ")
 
 

よろずや さんの引用:
＞HasFieldNamesでFalseを指定しているのですが、ヘッダーが取り込まれます。
 
HasFieldNames ←ヘッダがある
ですから True を指定しましょう。
 
＞「0件を取り込みました」と表示されてしまいます。
 
件数を取得する処理が何も書かれていません。

＞ヘッダー無しで取り込みがしたいというのが目的になります。
 
ヘッダーが有るのに False 指定にすると、
ヘッダー部の読み込みでエラーになるはず。
読み込みエラーの内容が別テーブルに記録されます。
そのテーブルを無視すればよろしいかと。

引用:
1行目はヘッダーなので取り込まないようにしようとしているのですが、
 
HasFieldNamesでFalseを指定しているのですが、ヘッダーが取り込まれます。

引用:
インポート、エクスポート、またはリンクするときにフィールド名としてテキスト ファイルの最初の行を使用するには、True (1) を使用します。 テキスト ファイルの最初の行を通常のデータとして扱うには、False (0) を使用します。 この引数を空白にすると、既定値 (False) と見なされます。 Microsoft Word の宛名の差し込みデータ ファイルの場合は、この引数は無視され、最初の行には常にフィールド名が含まれます。

引用:
ヘッダーにブランク行があり、ヘッダー有で取り込むとヘッダー部分の
取込エラーとなり、ヘッダー無しで取り込みがしたいというのが目的に
なります。