Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


38917 / 76732 ←次へ | 前へ→

【42940】Re:ブックの保存
発言  パン E-MAIL  - 06/9/26(火) 10:45 -

引用なし
パスワード
   悩み中 さん
追伸、やはりファイルが読み取り専用にするとエラー1004がでました。
保存ファイルのプロパティーで確認ください。


>
>こんにちは。
>テストしましたがOKでした。ということは、
>>?指定したフォルダがあることを確認します。
>>?ファイルを含むフォルダが読み取り専用になっていないことを確認します。
>この二点が怪しいですね、
>
>>どうして止まってしまうのか教えてください。
>>何度実行しても、同じ部分で止まります。
>>どの部分がおかしいのでしょうか?
>>
>>
>>【マクロの内容】
>>"集計"というブックのシートをコピーし、
>>名前を付けて保存というマクロを作成途中です。
>>マクロは"集計"ブックに記述しました。
>>また"集計ブックの"規定値シートには
>>以下の情報が入力してあります。
>>
>>セルC8→D:\デマンド\
>>セルI7→RE_CALCU
>>セルJ7→合計
>>
>>【エラーの内容】↓
>>実行じエラー'1004':
>>ファイルにアクセスできませんでした。次のいずれかを行ってみてください。
>>?指定したフォルダがあることを確認します。
>>?ファイルを含むフォルダが読み取り専用になっていないことを確認します。
>>?指定したファイルの名前に次のいずれかの文字も含まれて居ないことを確認します。
>>?ファイル名及びパス名が半角で218文字より長くないことを確認します。
>>
>>【実際の記述】(★止まる部分)
>>Sub 6.保存2.()
>>  Sheets("規定値").Select
>>  HD = Range("C8")
>>  HS = Range("I7")
>>  HF = Range("J7")
>>  保管 = HD & HF
>>  Sheets(HS).Copy
>>  Range("A1").Select
>>  Application.DisplayAlerts = False 
>>  ActiveWorkbook.SaveAs Filename:=保管, _   ★ここで止まります。
>>    FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
>>    ReadOnlyRecommended:=False, CreateBackup:=False
>>
>>  ActiveWindow.Close
>>
>>End Sub
0 hits

【42935】ブックの保存 悩み中 06/9/26(火) 9:35 質問
【42936】ブックの保存 悩み中 06/9/26(火) 9:36 発言
【42937】ブックの保存 悩み中 06/9/26(火) 9:37 発言
【42938】Re:ブックの保存 ハチ 06/9/26(火) 9:42 発言
【42939】Re:ブックの保存 パン 06/9/26(火) 10:37 発言
【42940】Re:ブックの保存 パン 06/9/26(火) 10:45 発言

38917 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free