- ベストアンサー
エクセルマクロでLANDISKに上書き保存するには
データバックアップ用にマイネットワークのLANDISKに上書き保存したいのですが、 ファイル.save をするのに ChDriveやChDirが旨く利かないようです。 ちなみに ファイル.SaveAs "\\Landisk\ファイル は行けますが、余計な「置き換えますか？」の忠告が出てきます。 この忠告を出さないようにしたいのですが。
- sintaro-hosome
- お礼率33% (20/59)
- その他（プログラミング・開発）
- 回答数2
- ありがとう数4
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (1)
- himajin100000
- ベストアンサー率54% (1660/3060)
やったことはない。忠告自体は http://www.relief.jp/itnote/archives/001936.php で無効化できる【かも】(自信なし)しれないけど・・・・ (もちろんLANDISK以外の場所にファイルが存在して上書きするときもメッセージはでなくなるんじゃないかと) #何故出るのかは調べてません
お礼
application.displayalarts で解決できました。どうもありがとうございました。
関連するQ&A
- Excel VBA 保存 上書き保存されてしまう
エクセルデータを閉じる時に元データとは違う場所にバックアップをとるように以下のようなコードを記述しました。（Excel内の一部のデータが何かしらのタイミングで消えてしまう現象が起き、どのタイミングで消えているのかを探るために誰かしらがデータを開いて閉じる時にその閉じた時間をファイル名にして保存させるというのが目的です） Sub Auto_Close() Worksheets("Sheet1").Select 'シート1を開く ThisWorkbook.Save '元データの保存場所に上書き保存 Filename = Format(Now(), "yyyy-mm-dd-hh-mm-ss") ThisWorkbook.SaveAs Filename:="\\●●\●●\●●\●●\●●\" & Filename & ".xlsm" '別の場所に名前をつけて保存 End Sub この別の場所に保存したデータ（(1)とします）を開いて中身を確認してから閉じるともちろん再度閉じた時間をファイル名にして保存する（(2)）ことになるのですが、このとき上書きされるような形になってしまい(1)のデータが残りません。(1)が残るようにするにはどこを修正すればいいのでしょうか？
- ベストアンサー
- Excel（エクセル）
- 上書き保存されない
saveメソッドを使用しているのですが、上書きされないのです。 最初に名前をつけて保存で保存し、処理の最後にブック名を変数にして、saveで上書き保存しているのですが、なぜか教えてください。 Dim wb集計 As Workbook ActiveWorkbook.SaveAs Filename:="c:\集計.xls" 集計 = "集計.xls" Set wb集計 = Workbooks(集計) ～割愛～ wb集計.Save
- 締切済み
- Visual Basic
- Excel マクロのsaveasでファイル保存の方法で教えて下さい
Excel2003で、USBメモリ上の2つのファイル（マクロを保存したmacro.xls及び作業を行うsagyo.xls）を開き、マクロをかけて、最後にxlsファイル形式で上書き保存したいのですが、 （1）ActiveWorkbook.Save で、上書き保存を行うと、なぜかUSBメモリ上にhtmlファイル保存されてしまいます。このため、xlsファイル形式保存をあえて明示し、saveasの既定値であるxlWorkbookNormalを指定し、 （2）ActiveWorkbook.SaveAs , FileFormat:=xlWorkbookNormal とすると、（カレントフォルダである）マイドキュメントに保存されてしまいます。 Q1.（1）のようになる原因は何でしょうか？ Q2.USBメモリは、他のPC環境でも使うので、「saveas "F:\sagyo.xls"」などとドライブ指定せずに使いたいのですが、USBメモリ上に上書き保存するマクロの書き方はないでしょうか？
- 締切済み
- オフィス系ソフト
- 開いているエクセルを上書き保存するマクロがしりたいのですが
開いているエクセルを上書き保存するマクロがしりたいのですが 単純に ActiveWorkbook.Save ActiveWorkbook.Close では ウィンドウだけ閉じてエクセルの画面は残ってしまいます どうしたら 全て閉じるのか知りたいのですが、よろしくお願いします。
- ベストアンサー
- Windows XP
- エクセルのファイルで、上書き保存してしまいました
エクセルのファイルで、上書き保存をしてしまいました 前のファイルを呼び出したいのですが方法はありますか？ 自分なりに調べてみたつもりですが、 インターネット上での回答はというと、 「無し」 上書き保存してしまったのは もう蘇らせないのでしょうか；？ 強制終了してしまったときなど、 バックアップファイルから復元する方法があったように思いますが 下記のような手順でも、 どうしてもつまづいてしまいます 「バックアップファイル」の開き方 「ファイル」「開く」を選択し、[ファイルの種類]ボックスの一覧の[バックアップファイル]をクリックします。 [ファイルの場所]ボックスの一覧で、ブックが保存されているフォルダを選択します。 [ファイルの種類]ボックスの一覧の[バックアップファイル]をクリックします。 で[バックアップファイル]の項目が見つけられません。 上書きしてしまったのが１ヶ月前のデータなので； せめて先日の停電で強制終了した際のデータでもいいから戻したい状況です・・・ ご存知の方いらっしゃいましたら どうかよろしくお願いいたします
- ベストアンサー
- オフィス系ソフト
- エクセルで上書き保存できない
取引先から送られてきたエクセルのデータがあります。 私のほうでデータを加工するために、何かを入力し、 「上書き保存」を実行すると 「ファイルを保存できませんでした。」というメッセージが表示されます。 「名前をつけて保存」も出来ませんでした。 ちなみに、このファイルにはマクロを含んでいます。 ファイルを保存できないことと、マクロが関係あると思うのですが、私はマクロの知識が乏しいため、よくわかりません。 なぜ、保存できないのでしょうか？ また、保存できるようにする方法はありますでしょうか？
- ベストアンサー
- オフィス系ソフト
- 上書き保存しかできないようにできますでしょうか
何度もすみません、こちらで質問させていただいた者です。 http://okwave.jp/qa3987988.html ブックを保存するときに、絶対にファイル名を変えられないようにできますでしょうか。 上書き保存はできるけれども、名前を変えて保存はできないようなイメージです。 ブックを上書き保存するSaveメソッドを使って保存してからファイルを閉じるような マクロを実行させる感じかとも思ったのですが、ファイルメニューから 「名前を変えて保存」もできないようにしたいのです。 そんなことはできますでしょうか。
- 締切済み
- オフィス系ソフト
- ＥＸＣＥＬマクロで上書きメッセージ無しで保存する方法
ＥＸＣＥＬマクロで上書きメッセージ無しで保存する方法をお願いします ActiveWorkbook.SaveAs "C:\Documents andSettings\Nakatani\MyDocuments\Book1.xls" の様にするとすでにファイルがある場合上書きメッセージが出ます メッセージを出さずに上書きするプログラミングを教えて下さい 宜しくお願いします
- ベストアンサー
- その他（プログラミング・開発）
- エクセルで上書き保存すると
ファイル名の後ろに[1]と付いて、上書きでなく別ファイルとして保存されてしまいます。 現金出納帳なので、どんどんたまるとどれが一番最近のものか分からなくなり、 間違いの元ですのでファイルは１つにしたいのですが 普通に上書き保存はできないのでしょうか。 エクセルで金額を記入して、普通に上書き保存のボタンを押しているだけなのですが、 それでは保存の仕方が違うのでしょうか。 ちなみに何回かは普通に上書き保存ができていたのですが、 何が原因か分かりません。 また、ファイルを一番最近のものだけ残して あとは削除しようとしましたが削除しても次にエクセルを開いた時には 元に戻ってファイルが出てきます。 説明が下手で申し訳ございませんが どなたか分かる方よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- 助けて下さい 誤って上書き保存してしまいました
業務中、エクセルのファイル名を誤って上書き保存してしまいました 本当は、上書き保存してはいけないファイルの名前で保存してしまいました 復旧方法を教えて下さい 「そのファイル名で保存して」と言われて上書き保存したエクセルデータは書き換えてはいけないファイルだったんです ２～３時間してから「アカンかったんよ～」と言われ青くなってます 助けて下さい
- ベストアンサー
- オフィス系ソフト
お礼
どうもありがとうございました。ネットワークについては殆どと言うほど知識がありませんので、おかしなことをしていたようですね。