テーブルをテキストファイルに変換

テーブルまたはクエリーをテキストファイルに変換します。
この変換はDoCmdオブジェクトのTransferTextメソッドで実行できます。
書式は以下のとおりで、

 DoCmd.TransferText [transfertype][, specificationname], tablename, _
                           filename[, hasfieldnames][, HTMLtablename]
                           
第1引数のtransfertypeに組み込み定数を指定することでテキストファイルや
HTMLファイルとの入出力やリンクが可能となります。

第2引数のspecificationnameはテキスト ファイルをインポート、エクスポート、
またはリンクするときの設定の定義名を指定します。例えば「標準出力」などを
指定します。

サンプルコードではNorthwind.mdbのテーブル「受注」をテキストファイル
「受注.txt」に変換しています。

● サンプル ●

Public Sub FileExport1()
 Dim path As String
 path = "D:\"
  DoCmd.TransferText acExportDelim, , "受注", path & "受注.txt" 
End Sub


● 動作確認 ●

Dドライブに「受注.txt」が作成されていることを確認してください。


● 補足説明 ●

上記の処理はマクロのアクション「テキスト変換」を使用しても可能です。

Access97/2000



戻る


Excel Word Access VBA! モーグ