Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

66025 / 76807

←次へ　｜　前へ→


	【15348】Re:VBA参照設定の解除について

生茶 - 04/6/22(火) 9:07 -


	引用なし

	パスワード

ichinoseさんおはようございます。

>エラーが再現できる簡単なコードと再現手順が知りたいです。
>（こういうの記述するのは大変ですが、これを考えてる
>過程で何となく、原因コードが絞られてくる場合もあるものですよ）

　エラーが再現できる簡単なコードと再現手順を作成していた所、
　エラー原因が分かりました。
　うっかりWorkbooks("list.xls").Close Falseの部分を
　IFの外に記載していた為でした。。。
　
　If 参照設定解除(ThisWorkbook, "List") = 0 Then
　 ThisWorkbook.SaveAs ThisWorkbook.Path & "\list33.xls"
　 Workbooks("list.xls").Close False　←ここの部分
　End If

　　　　　　　　　　　↓

　If 参照設定解除(ThisWorkbook, "List") = 0 Then
　 ThisWorkbook.SaveAs ThisWorkbook.Path & "\list33.xls"
　End If
　 Workbooks("list.xls").Close False　←ここの部分

　今は、エラー発生も無く順調にマクロ作成の方進めております。
　
　ichinoseさんご教授誠にありがとうございました。
　感謝申し上げます。。。

　

0 hits

▼

【15050】VBA参照設定の解除について 生茶 04/6/14(月) 14:31