- ベストアンサー
Accessで存在しないファイルを指定して出力したい
DoCmd.TransferTextを使ってCSVファイルの出力を行いたいのですが、存在しないディレクトリを指定してファイル出力を行うとエラーメッセージ3044でエラーになります。 存在しないディレクトリが指定された場合は新たにディレクトリを作成してファイル出力を行うにはどうしたらよいでしょうか？
- hochi
- お礼率88% (110/125)
- Visual Basic
- 回答数1
- ありがとう数0
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
MakeSureDirectoryPathExists
関連するQ&A
- Accessのエクスポート、出力場所について
Microsoft AccessにてTranseferTextを用いてCSVファイルをエクスポートする際に、Accessのmdbファイルと同じディレクトリに出力したいと考えています。 参考書やネットを調べましたが、TransferTextで出力先を指定するには、ファイルを絶対パスにて指定する例しか見当たらず、また、試しに相対パスを自分で書いてみてやってみましたが、出力されません。 相対パスではできないのでしょうか？ それとも相対パスの書き方が悪いのでしょうか？ 自分で書いたのは、こんな感じのVBA文です↓ DoCmd>TransferText acExportDelim," Tbl_output エキスポート定義", "tbl_output", "./seikyu.csv", True
- ベストアンサー
- Access（アクセス）
- ACCESSのテーブルをCSVファイルに
こんにちは。 ACCESSテーブル内のフィールド値をカンマ付きのテキストファイルまたは ＣＳＶファイルで出力したいのですがなにか良い方法はないのでしょうか？ ちなみにDoCmd.TransferTextだのDoCmd.OutputToを試してみたので すが、うまくいきませんでした。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Accessで複数のクエリを1つのCSVファイルにエクスポートする方法
Accessで複数のクエリを1つのCSVファイルにエクスポートする方法はないでしょうか？ 現在は下記のような記述でそれぞれCSVファイルを作成しています。 クエリ1～3を1つのCSVファイルにエクスポートする方法があれば教えて頂きたいです。 よろしくお願いします。 DoCmd.TransferText acExportDelim, , "クエリ1", "C:test1.csv", True, "" DoCmd.TransferText acExportDelim, , "クエリ2", "C:test2.csv", True, "" DoCmd.TransferText acExportDelim, , "クエリ3", "C:test3.csv", True, ""
- ベストアンサー
- その他(データベース)
- Access csvファイルで出力したい
いつもお世話になっています。 フォームにボタンを作成して、指定したフォームをExcelファイルで保存しています。 これをcsvファイルで出力に変更したいのです。（フルパスではない方法） Private Sub Eccelで保存_Click() DoCmd.OutputTo acOutputForm, "活動記録", acSpreadsheetTypeExcel9 End Sub お力添えをお願いいたします。
- ベストアンサー
- その他(データベース)
- Access VBAでファイルのインポートについて
あるディレクトリにAccessのmdbファイルを置き、「インポート」フォルダを隣に置きます。 このフォルダ内にCSVファイルを置き、それをVBAでテーブル「tbl_import」にインポートさせたいのです。 ちなみにインポート後はディレクトリ「インポート」下層のディレクトリ「インポート済」に移動させたいのです。 下記例文では「file.csv」と書いていますが、このファイル名はインポートの都度、常に変わります。 インポートさせるファイルは常に一つです。 「*」を用いれば出来ると思っていたのですが、うまくいきません。 良い方法を教示いただけませんか。 DoCmd.RunSQL "DELETE * FROM tbl_import" DoCmd.TransferText acImportDelim, "インポート定義", "tbl_import", CurrentProject.Path & "\インポート\file.csv", True FileCopy CurrentProject.Path & "\インポート\file.csv", CurrentProject.Path & "\インポート\インポート済\file.csv" Kill CurrentProject.Path & "\インポート\file.csv"
- ベストアンサー
- その他(データベース)
- [if文]ファイル/ディレクトリの存在有無について
[if文]ファイル/ディレクトリの存在有無について教えて下さい。 「あるディレクトリ配下にファイル、ディレクトリがない場合、 エラーを出力。」を目的に以下のシェルを作成しました。 if [! -f $DIR/* -a ! -d $DIR/*] nodataend fi しかし、あるディレクトリ配下に複数のファイルが存在すると正常に処理されません。 この場合、どのような条件で指定すればいいのでしょうか。 個人的には条件で指定している*が問題ではないかと思います。 宜しくお願いします！
- 締切済み
- その他（プログラミング・開発）
- Access VBA CSV取込でファイル指定
いつもお世話になっております、この度もよろしくお願い致します。 作成環境:Access 2003 win XP ＣＳＶファイルをデータベース内のテーブルにインポートする、というプログラムを書いてるのですが、 Private Sub テスト() DoCmd.TransferText acImportDelim, "インポート定義", _ "tblImported", "C:\Temp.csv", True End Sub Ｃドライブにあるファイルのみしかインポートできず、これをダイアログボックスを呼び出してファイルを指定することなどはできるのでしょうか？ 検索を行いまして、ctlDlg.Filename～などメソッドを使うといいなど記載されている記事もよく見かけますが、どのように利用すればいいのか少し戸惑っております＾＾； ご多用の中大変申し訳ありませんが、ご回答いただければ幸いでございます。 よろしくお願い致します。
- ベストアンサー
- その他（プログラミング・開発）
- Access VBA CSV取込でファイル指定
いつもお世話になっております、この度もよろしくお願い致します。 作成環境:Access 2003 win XP ＣＳＶファイルをデータベース内のテーブルにインポートする、というプログラムを書いてるのですが、 Private Sub テスト() DoCmd.TransferText acImportDelim, "インポート定義", _ "tblImported", "C:\Temp.csv", True End Sub Ｃドライブにあるファイルのみしかインポートできず、これをダイアログボックスを呼び出してファイルを指定することなどはできるのでしょうか？ 検索を行いまして、ctlDlg.Filename～などメソッドを使うといいなど記載されている記事もよく見かけますが、どのように利用すればいいのか少し戸惑っております＾＾； ご多用の中大変申し訳ありませんが、ご回答いただければ幸いでございます。 よろしくお願い致します。
- 締切済み
- その他(データベース)
- Access VBA CSVファイルのインポート
お世話になります。 VBAにてCSVファイル(タブ区切り)をインポートするのに、 以下のように記述してますが、エラーとなります。 なお、インポート先のtempテーブルはインポートするCSVファイルの フィールドと同じ並びで予め作成したものです。 DoCmd.TransferText acImportDelim, , "temp", path, True 「実行時エラー2391 貼り付け先のtempテーブルには、'フィールド1_ フィールド2_フィールド3'フィールドがありません。」 このエラーを見る限り、フィールド1～3が一つのフィールドとして 認識されているように見受けられます。 タブ区切りなのか、カンマ区切りなのかを指定するようなパラメタは あるのでしょうか。 なお、当該CSVファイルをウィザードより手動でインポートする分には 問題無くインポート出来ます。 ************** インポートするCSVファイルはユーザーにより見出し（フィールド）の 並びが異なる場合がある為、インポート定義を予め作っておくことが できない状況です。 ご教授の程、宜しくお願い致します。
- ベストアンサー
- その他(データベース)
