HOME > 即効テクニック > AccessVBA > ファイル操作・他アプリケーションとの連携 > データをテキストファイルにエクスポートする

即効テクニック

ファイル操作・他アプリケーションとの連携

データをテキストファイルにエクスポートする

(Access 2000/2002/2003)
● 概要 ●
構文  expression.TransferText(TransferType, SpecificationName, TableName, 
			      FileName, HasFieldNames, HTMLTableName, 
			      CodePage)

設定項目            内容
expression	    DoCmdオブジェクト[省略不可]
TransferType	    変換の種類をAcTextTransferTypeクラスの定数で指定
		   [省略可能]
SpecificationName    エクスポート定義名を文字列式で指定[省略可能]
TableName	     Accessテーブル/クエリの名前を文字列式で指定[省略可能]
FileName	     テキストファイルのパス名を文字列式で指定[省略可能]
HasFieldNames	     テキストファイルの1行目をフィールド名とするか否かを指定
		    [省略可能]
HTMLTableName	     HTMLファイル名を文字列式で指定[省略可能]
CodePage	     コードページで使われる文字セットの名前を指定
		    [省略可能]


Accessのテーブルやクエリのデータを、*.txt、*.csv、*.htmlなどのテキストファイルに出力します。引数に次の表の中のacExportDelim、acExportFixed、acExportHTMLのいずれかを指定します。

・引数に指定する定数(AcTextTransferTypeクラス)

定数		説明
acExportDelim	カンマ、タブなど区切り記号つきエクスポート
acExportFixed	固定長エクスポート
acExportHTML	HTMLエクスポート
acExportMerge	Word差し込みデータエクスポート
acImportDelim	カンマ、タブなど区切り記号つきインポート(既定値)
acImportFixed	固定長インポート
acImportHTML	HTMLインポート
acLinkDelim	カンマ、タブなど区切り記号つきリンク
acLinkFixed	固定長リンク
acLinkHTML	HTMLリンク

引数に、出力元のオブジェクト名を指定します。引数には、出力先のパス名を指定します。
ファイル名のみ指定した場合、テキストファイルは、メニューの[ツール]→[オプション]→[全般]の[既定のデータベースフォル
ダ]に指定されているフォルダに作成されます。引数にTrueを指定すると、フィールド名をテキストファイルの1行目として出力します。
Falseを指定すると、フィールド名は出力されず、1レコード目がテキストファイルの1行目となります。引数を省略すると、Falseを指定したこととなります。


● サンプル ●
Sub TransferTextExportSample()
    'エラーの場合、myErr: へ
    On Error GoTo myErr
    '[顧客テーブル]のデータを、「C:\出力顧客テーブル.txt」に出力
    DoCmd.TransferText acExportDelim, , "顧客テーブル", "C:\出力顧客テーブル.
txt"
    MsgBox "[顧客テーブル]を「出力顧客テーブル.txt」に書き出しました"
     'プロシージャを終了
    Exit Sub                
myErr:
    'エラーメッセージを出す
    MsgBox Err.Description
End Sub