エクセルマクロで【ファイルA】に【マクロ表示】を作成。
内容:【ファイルA】は4シート(シート名:【チャート】【ひな型】【データ】【メニュー】)。
(1)【メニュー】にあるリストから「地域A」を選択
(2)他のブックを開き「地域A」のデータをコピー、【データ】に貼り付け。20のブックからデータを貼り付ける。
(3)【チャート】【ひな型】には、グラフがある。
元のデータは【データ】にあるので、「地域A」のデータがコピーされた時点でグラフは出来る。
(4)【チャート】、【ひな型】をコピーする。
(5)【データ】で作表し、【ひな型(2)】【チャート(2)】に貼り付ける。
(6)【チャート(2)】、【ひな型(2)】を新しいブックに移動。
新しい名前【Book1】で保存。リンクを切り上書きする。
(7)【マクロ表示】は終了し、【メニュー】に戻る。
画面は【Book1】【ひな型(2)】で終わる。
(8)【Book1】を閉じる。
【ファイルA】【メニュー】から「地域B」を選択。【マクロ表示】を実行。
以上の手順で、【ファイルA】を閉じることなく、「地域A」「地域B」・・と選択して、【マクロ表示】を実行していくと、
7回目で(4)でエラーになってしまう。
Worksheets("ひな型").copy before:=worksheets(1)の行で。
エラーメッセージは「実行時エラー1004 WorksheetクラスのCopyメソッドが失敗」。
【ファイルA】のシートを右クリックでを見てみると、
「シートの移動またはコピー」の「移動先ブック名」が(新しいブック)、挿入先が空になっています。
通常、「移動先ブック名」は現在のブック名【ファイルA】、
挿入先【メニュー】【データ】【ひな型】【チャート】であると思うのですが。
シートのコピー回数に制限でもあるのでしょうか?
マクロで回避が出来る方法があればお教え下さい。
次のリストを選択前に毎回【ファイルA】を閉じる以外無いのでしょうか?
よろしく御指導下さい。
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
こんにちは。
本当は、きちんとした全体のコードと説明を入れていただきたかったですね。
その問題はねもうお分かりになっているかもしれませんが、
Worksheets と Sheets の違いではないかと思います。
チャートとは何を指すか知りませんが、おそらく、Worksheet ではないのではないでしょうか?Chart ではありませんか?それは、Copy メソッドでは取得できません。
Wendy02様。
Worksheets("ひな型").copy before:=worksheets(1)を
Sheets("ひな型").copy before:=Sheets(1)に変更して試してみましたが、残念ながら7回目で同様なエラーです。
シート名【チャート】はワークシートです。
全体のコードは長くて記載できません。
(4)でエラーになったとき、シートを見てみると、
【ひな型】にある「グラフ11」の「第2数値軸」が選択された状態で止まっています。
「グラフ11」「第2数値軸」は【マクロ表示】の前半部分でAxesで設定しています。
マクロ初心者なので、本を見ながら記述しています。
さらなるアドバイスをお願いいたします。
ありがとうございました。
No.2
- 回答日時:
こんにちは。
今の状態では、解決の目処が立ちません。
コードを見せずに、言葉だけで判断してください、という方は時々いますが、ほとんど解決していないはおろか、多くは最後はトラブルの原因になるので、ご自身で、良くコードの内容をまとめられたほうがよいです。回答者泣かせの質問です。
7回目でエラーになるのは、おそらくは、オブジェクトを取得しながら、解放をしていないのが原因だと想像します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Visual Basic(VBA) 【前回の続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/16 16:44
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/05/24 08:33
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 12:30
- Excel(エクセル) フォルダ内の全ブックのシート名を変更したい 7 2022/09/22 21:34
- Visual Basic(VBA) 【困っています2】VBA 追加処理の記述を教えてください。 2 2022/08/26 11:42
- Excel(エクセル) 【マクロ】同じフォルダ内にある複数ブックから1つのブック内の1シートにデータを集めたい 6 2022/09/28 18:16
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/01/26 12:00
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAで保存しないで閉じると空の...
-
エクセル関数>参照ファイル名...
-
マクロの保存先、開いてるすべ...
-
【Excel VBA】マクロでExcel自...
-
エクセルで未保存に対するメッ...
-
名前の変わるブックをアクティ...
-
エクセル;相対パスを絶対パスへ...
-
エクセルVBAで作成した別ブック...
-
【Excel】マクロの保存先について
-
EXcelのマクロで相対パスでファ...
-
excelで直前に参照していたブッ...
-
複数のExcelブックを1つ...
-
Excel VBEを起動しようとしたら...
-
エクセルのvbaにて thisworkboo...
-
エクセル 半角カナを全角に、...
-
個人用マクロブックが消えました
-
エクセルVBA 個人用マクロブッ...
-
EXCELブックが勝手に開いて困っ...
-
EXCELマクロで、開いてはいるが...
-
EXCEL VBA セルから...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAで保存しないで閉じると空の...
-
エクセル関数>参照ファイル名...
-
【Excel VBA】マクロでExcel自...
-
エクセル;相対パスを絶対パスへ...
-
マクロの保存先、開いてるすべ...
-
【Excel】マクロの保存先について
-
excelで直前に参照していたブッ...
-
EXcelのマクロで相対パスでファ...
-
エクセルVBAで作成した別ブック...
-
複数のExcelファイルの印刷設定...
-
エクセルのvbaにて thisworkboo...
-
EXCELのボタンによるマクロの登...
-
エクセルVBA 個人用マクロブッ...
-
EXCELマクロで、開いてはいるが...
-
EXCELブックが勝手に開いて困っ...
-
エクセルで未保存に対するメッ...
-
[フィルターオプションの設定]...
-
【Excel】特定セルの内容をテキ...
-
ファイル名変更後も、マクロを...
-
名前の変わるブックをアクティ...
おすすめ情報