[ツリー表示へ] [ワード検索] [Home]
タイトル ： Excelの「名前を付けて保存」ダイアログ 投稿日 ： 2007/05/16(Wed) 15:19 投稿者 ： やなこ
| アプリケーションから Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet xlApp = CType(CreateObject("Excel.Application"), Excel.Application) xlBook = xlApp.Workbooks.Open(ファイルパス) としてExcelのブックを表示させています。 この起動したExcel上で「名前を付けて保存」メニューを選択されたときに 出てくる保存ダイアログについて質問です。 保存ダイアログで開いているディレクトリをもともとのファイルパスではなくて こちらから何らかのパスを指定して、（ローカルマシンのマイドキュメントの下 など）そこを開いた状態で指定させることはできますか？ 理由としては、ここで開くExcelは共有ファイルサーバにあるドキュメントなので、 所在をできるだけユーザに隠しておきたい（ユーザが上書きするのをできるだけ 防ぎたい）ためです。 無理であればOpenするブックを一旦ローカルのどこかにコピーしてきておいて、 それを開く方法で対処しようと思っているのですが、それだとコピーしてきた ファイルを何かのタイミングで消さなくてはならないので、開くだけならサーバの ものを開いて見せて、保存したいときは間違えないようにユーザのディレクトリを 指定するようにしたいのです。 |
をクリックするとツリー全体を一括表示します） - Excelの「名前を付けて保存」ダイアログ - やなこ 05/16-15:19No.5499