即効テクニック |
● 概要 ● 構文 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