質問: excelの[名前を付けて保存]で出てくるフォルダを指定した。 - excleの[名前を付けて保存]を押すと、初期値で表示されるフォルダがありますが、 これをなんとか固定にしておく方法はないでしょうか??? 出来れば、全部のexcelを、固定にしてしまうのではなく、あるexcelだけは、 [名前を付けて保存]のフォルダを固定にしたいと考えています。 実は、vbでサーバのexcelを起動するようにしているのですが、これを[名前を付けて保存]に してしまった場合に、サーバのフォルダが指定されてしまうために、とっても悩んでいます。 vbを使用していますので、少々のことなら操作可能かとも考えております。 もし、何かアドバイスをお持ちの方がいらっしゃいましたら、どうか何でもかまいません。 よろしくお願いいたします。 m(。_櫻_。)m -
回答: setcurrentdirectorya-api関数を使ってはいかがでしょう。 例えば、該当ファイルのみ、beforesaveイベントでカレントフォルダの変更を行います。 declare function setcurrentdirectory lib "kernel32" _ alias "setcurrentdirectorya" (byval lppathname as string) as long public sub sample() dim llapiret as long dim lsdir as string lsdir = "ディレクトリへのパス\" & vbnullstring llapiret = setcurrentdirectory(lsdir) end sub