- 締切済み
Access ファイル名に処理日時をセットする方法
Access2003上のテーブルをExcel形式に「ワークシート変換」する際、ファイル名に処理日時（now()）をセットする記述方法をお教え下さい。VBではなく、「マクロ」の「ワークシート変換」アクション内の「ファイル名」の記述をお教え下さい。よろしくお願い致します。
- tomo0327_4
- お礼率0% (0/19)
- その他(データベース)
- 回答数1
- ありがとう数4
- みんなの回答 （1）
- 専門家の回答
みんなの回答
- DexMachina
- ベストアンサー率73% (1287/1744)
> ファイル名に処理日時（now()）をセットする記述方法 この場合は、ファイル名そのものではなく、式が必要ということになるので、 先頭に「=」が必要になります。 また、Windowsのファイル名には「/」や「:」(いずれも半角)は使えないので、 それを避ける必要があります。 この書式を指定するのには、Format関数を使用します。 (Format関数の詳細については、Accessのヘルプをご確認下さい) ファイル名が日時の数字のみでよいなら(→「20091031132405」)、 ="c:\" & Format(Now(), "yyyymmddhhnnss") & ".xls" すべてハイフンつなぎでよいなら(→「2009-10-31-13-24-05」) ="c:\" & Format(Now(), "yyyy-mm-dd-hh-nn-ss") & ".xls" 年月日と日付の間はスペースで区切り、時刻には「：」(全角)を使うなら (→「2009-10-31 13：24：05」)、 ="c:\" & Format(Now(), "yyyy-mm-dd hh：nn：ss") & ".xls" ※くれぐれも「：」は半角にはしないようご注意下さい。
関連するQ&A
- AccessのテーブルデータをExcelの特定のワークシート名にエクスポートすることは可能ですか
AccessのテーブルデータをExcelにエクスポートするようマクロを設定しているのですが、そのファイルの中の特定のシートにエクスポートすることは可能ですか？1つのExcelファイルの中で、エクスポートするテーブルを分けたいのです。 マクロですと、"ワークシート変換"アクションの引数[ファイル名]欄で何か設定するのでしょうか？ それともAccessから直接は無理なので、Excelのマクロで自動化したほうがよろしいのでしょうか？教えてください。
- 締切済み
- オフィス系ソフト
- ●ACCESS→Excelのエクスポート（マクロ）で教えて下さい。
ACCESS2000、WindowsXPです。 テーブルをExcelへエクスポートするマクロを作りましが、 下記で苦労しています。 (1)マクロ実行してから「エクスポートしますか？」「OK/キャンセルボタン」ウインドウを出したい。 (2)保存場所を一定の場所に指定したい。 数人で使用する為、該当ACCESSファイルが置いてあるネットワーク上の フォルダ（\\Central-server\public）に指定してみましたが、ファイルを移動した際等に、 パスが変わってしまうので一定の場所に設定したいです。 →各々のPCの「デスクトップ」or「該当ACCESSといつも同じフォルダ」 今のところ、下記のように設定してます。 【作成したマクロ】 ◆アクション1→ワークシート変換 ・変換の種類：エクスポート ・ワークシートの種類：Microsoft Excel8-9 ・テーブル名：ＢＥ ・ファイル名： ="C:\Documents and Settings\User\デスクトップ\ＢＥ_" & Format(Now(),"yymmdd_hhnnss") & ".xls" もしくは、 ="\\Central-server\public\ＢＥ_" & Format(Now(),"yymmdd_hhnnss") & ".xls" ◆アクション2→メッセージボックス ・「エクスポート完了しました。」→OKしか出ない。 どなたかご教授頂けないでしょうか。 宜しくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- 任意Excel,TxtファイルをAccessへ取込
ダイアログボックスにて取得したEXCEL2003ファイルおよびTextのインポート方法を教えていただけないでしょうか？ダイアログボックスからファイル名を取得するところ(テキストボックスにファイル名を代入するところまで）は、AccessClubのサンプルファイルで何とか紐解けましたが、この選択されたExcelファイルをAccessのテーブルとして（テーブル名＝Excelファイル名)ファイルインポートするところがなかなか作れません。調べてもなかなか情報みつからずです。いまは、ファイル名とフォルダ場所を固定させることによって、マクロの”ワークシート変換”にて取り込んでおります（添付画像参照ください）。どうかアドバイスのほどよろしくお願い申し上げます。なお、Access2003です。
- ベストアンサー
- その他([技術者向] コンピューター)
- アクセス２０００のマクロの設定について
アクセスのマクロで、アクセスのデータベースを、指定したエクセルファイル内の、指定したシートにエクスポートするマクロ設定をしたいのですが、よく判りません。 マクロ設定で、アクションのワークシート設定を選ぶまでは判ったのですが、テーブル名、ファイル名、フィールド名の設定、範囲の設定の意味が判りません（ヘルプを見たのですが、理解出来ません）。どなたか設定方法を教えて下さい。
- ベストアンサー
- オフィス系ソフト
- ACCESSで、テキストファイルをインポートしたい
宜しくお願い致します。 ACCESSで、テキストファイルをインポートしてテーブルを作成したいのですが、ファイル→インポートを選択して、ウィザードを開く方法は分かるのですが、マクロを作成してインポートは出来ないでしょうか？ excel、CSVファイルでしたら、「ワークシート変換」、「テキスト変換」のマクロでインポートしたりエクスポートしたり出来ると思うのですが・・・、 (1)テキストファイルをインポートしたり、エクスポートしたりする場合、どのようなマクロがあるのでしょうか。 （ためしに、「出力」マクロで、あるテーブルをCSVファイルにエクスポートしてみたのですが、カンマ区切りにできず、excelのような枠付きのテキストファイルになってしまいました。） (2)容量が大きいデータの場合は、テキストファイルでエクスポートしたほうが良い・・・という認識に間違いはありませんでしょうか。 質問が一つ増えてしまいましたが、宜しくお願い致します。
- ベストアンサー
- その他(データベース)
- Accessのファイルサイズ縮小について
Access 2000で作成したmdbファイルを Access 2013環境で使用しています。 ・テーブルのみのmdbファイル(1)があります。 mdbファイル(1)の中には、テーブルオブジェクトが1つあり、フィールドが1つ、 フィールドサイズは255です。レコード件数は、36万5000件程度あります。 ・フォームやクエリ、マクロ、mdbファイル(1)と リンクテーブルでつないでいるmdbファイル(2)があります。 mdbファイル(1)のファイルサイズが、90MBに達しており mdbファイル(2)を開いたり、何か処理させるのを遅くしているのではないか と思っています。 他の方の質問をチェックしましたが、結果は 最適化について オプション→現在のデータベース→閉じるときに最適化する→チェックON済み 手動で最適化する→変化なし。 MDBをMDEに変換する Access 2013では、バージョンが違うので変換できないようです。 accdb形式に変換→accde形式に変換しましたが、変化なし (そもそも、ファイル(1)はテーブルのみで、マクロやプロシージャは無いので、 意味が無かったかも) となっており、対処法が見つからなくて困っています。 何か良い案はないでしょうか。
- ベストアンサー
- その他(データベース)
- アクセスからエクセルファイルが開けない
Ｃドライブに、新規 Microsoft Office Excel ワークシート.xlsxと言うファイルを作成しました。 そのうえで、アクセスから ―――――――――――――――――――――――――――――――― Sub できない1() Dim xlsWB As Object Set xlsWB = CreateObject("C:\新規 Microsoft Office Excel ワークシート.xlsx") xlsWB.Application.Run xlsWB.Name Set xlsWB = Nothing End Sub ―――――――――――――――――――――――――――――――― をすると ------------------------ 実行時エラー '1004' マクロ'新規 Microsoft Office Excel ワークシート.xlsxを実行できません。 このブックでマクロが使用できないか、またはすべてのマクロが無効になっている可能性があります。 ------------------------ となります。 なので別の方法で開こうと、 ―――――――――――――――――――――――――――――――― Sub できない2() Dim xlApp As Excel.Application Dim xlBook As Excel.Application Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Open("C:\新規 Microsoft Office Excel ワークシート.xlsx") xlApp.Visible = True Set xlApp = Nothing Set xlBook = Nothing End Sub ―――――――――――――――――――――――――――――――― にしたのですが、 実行時エラー’13’型が一致しません になります。 何がダメなのでしょう？ マクロ付きファイルにしないとダメですか？ もしくはファイル名に空白があるからエラーになるのでしょうか？ そして、なぜ二つのコードのエラー内容がちがうのでしょう？ それと、なぜか上記マクロを実行していると ~$新規 Microsoft Office Excel ワークシート.xlsx と言うファイルが出来上がります。（添付画像参照） でもファイルは開いていません。 この状態で、新規 Microsoft Office Excel ワークシート.xlsx をダブルクリックして開こうとすると、一瞬だけ画面に表れてすぐ消えます。 オフィスのバージョンは2007です。 ご回答よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Access2007のエキスポートについて
Access2007でマクロを使ってExcel2007のファイル(xlsx)形式へエキスポートします。その際、 ・「ワークシート変換」を指定 ・ワークシートの種類に「Excel Work book」 ・出力ファイルパスに「(絶対パス)\(ファイル名).xlsx」 としました。 既にAccess2007のテーブルには、65535行を超える200000行のレコードが入っていることが確認できてます。 マクロを実行すると、「指定範囲を広げることができません」とダイアログが出てしまい、マクロが中断し、異常終了してしまいます。 windowsXP SP2 pentium4を使用。 異常終了せず、全レコードをファイルにエキスポートする方法はありませんか？ 宜しくおねがいいたします。
- ベストアンサー
- その他(データベース)
- 【Access VBA】クエリ・テーブルのエクスポートについて
MSOffice2003を使用しています。 マクロにてクエリやテーブルをエクスポートする際、 ------------------------------------------- アクション名：ワークシート変換 変換の種類：エクスポート ワークシートの種類：Microsoft Excel 3 テーブル名：クエリＱ（クエリ及びテーブル名） ファイル名：C:\ＸＸＸＸ.XLS ------------------------------------------- としています。 今回、ファイル名（エクスポート先のファイル）に変数を使用したく、 VBAでのコーディングが必要と考えています。 ファイル名は、ＸＸＸＸ_yyyymmdd.XLS（yyyymmddは処理日付）にしたいのです。 この場合、どうコーディングすればよろしいでしょうか？
- ベストアンサー
- オフィス系ソフト
- マクロでエクスポート（アクセス97）
W2000・アクセス97・エクセル2000です。 アクセスのクエリーを、マクロを使用して、新規にエクセルにエクスポートしたいです。 マクロでは、 ・変換の種類 エクスポート ・ワークシートの種類 Excel97（2000は選択の中になし） ・テーブル名 エクスポートしたいクエリーを指定 ここまでは、わかりましたが、ここまででマクロを実行すると、 ”このアクションまたはメゾットを実行するには、[file name/ファイル名]が必要です” と、表示され、エラーになります。 できましたら、この後、どのようにすればよいのか？ もしくは、こういう方法で、というのがありましたら、お教えくださいませ。詳しく解説してくれている、URLのご紹介でも、かまいません。 お手数ですが、どなたか、よろしくお願い申し上げます。
- ベストアンサー
- オフィス系ソフト
