|
どうして止まってしまうのか教えてください。
何度実行しても、同じ部分で止まります。
どの部分がおかしいのでしょうか?
【マクロの内容】
"集計"というブックのシートをコピーし、
名前を付けて保存というマクロを作成途中です。
マクロは"集計"ブックに記述しました。
また"集計ブックの"規定値シートには
以下の情報が入力してあります。
セル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
|
|