[[20130220165602]]　『Access vbaでブック名を指定してシート名変更』（Access）　ページの最後に飛ぶ

『Access vbaでブック名を指定してシート名変更』（Access）

 例えば、c\test\aaaという中のtestというexcelファイルのシート名を「変更シート」に変更したい場合、どのようにかきますか？
 DoCmd.OutputTo acOutputQuery, "Q2_test", acFormatXLS, "C:\test\aaa\test.xls"
として、ブックをexcelで保存できたのですが、シート名が「Q2_test」になってしまいます。
 おわかりになるかた、ぜひ教えてください。

 手元にMS_ACCESSがないので検証できていませんが、ここが参考にならないですか？
 　　　　　　　　　　　　　　　　　　　　　　　　　↓
http://social.msdn.microsoft.com/Forums/en/isvvba/thread/b697ced5-f25a-489a-9204-5d002be622a1

 つまり、TransferSpreadsheetメソッドを使って、こんな感じにしたらどうでしょうか？
 　　　　　　　　　　　　　　　　　　　　　　　　↓
 DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Q2_test",  "C:\test\aaa\test.xls", True, "変更シート"

 "変更シート”のところは、パラメータ（RANGE)で、MSDNの解説によると、

 『ワークシートのセルの範囲または範囲の名前を文字列式で指定します。・・・。
 　ワークシートにエクスポートする際は、この引数を空白のままにしておきます。
 　範囲を入力するとエラーが発生します。』

 とあるので、エラーが発生するのかも知れませんが、
 上の回答者はformer MVPですし、質問者は『It works!』と反応していますからねぇ。

 (半平太) 2013/02/20(Wed) 23:45

コメント返信：

[ 一覧(最新更新順) ]

[[20130220165602]] 『Access vbaでブック名を指定してシート名変更』（Access） ページの最後に飛ぶ

[[20130220165602]]　『Access vbaでブック名を指定してシート名変更』（Access）　ページの最後に飛ぶ