
標題のエラーが出ます。理由ご存じの方、教えて下さい
【エラーメッセージ】
実行時エラー '424': オブジェクトが必要です。
【エラーコード】
Set name = Thisbook.Worksheets(シート(i))
【コード⇒シート1から3のA1セルに あいうえお と入力するマクロ】
Sub sheetarrayの配列()
Dim name As Worksheet
Dim シート As Variant
シート = Array("Sheet1", "Sheet2", "Sheet1")
Dim i As Integer
For i = 0 To 2
Set name = Thisbook.Sheets(シート(i))
name.Range("a1") = "あいうえお"
Next
End Sub
No.2ベストアンサー
- 回答日時:
Thisbook.Sheets(シート(i))
を
ThisWorkbook.Sheets(シート(i))
にしてください。
先頭に
Option Explicit
をつけて実行すると、
Thisbook がおかしいというメッセージを出してくれます。
Option Explicitを付ける癖をつけておくと良いでしょう。
VBEの画面のツール(T)でオプション(O)を選択、編集タブで「変数の宣言を強制する」にチェックを入れておくと、モジュール挿入時、自動的に
Option Explicitが追加されます。
あと、
Array("Sheet1", "Sheet2", "Sheet1")は
Array("Sheet1", "Sheet2", "Sheet3")の間違いかと。

ありがとうございます。解決しました
ThisWorkbook.Sheets(シート(i))
以下も単純ミスです
Array("Sheet1", "Sheet2", "Sheet1")
No.3
- 回答日時:
こんにちは
単純に「Thisbook」がどこにも定義されずに、いきなり使われているので、「オブジェクトが必要です」と文句を言っているのではないでしょうか?
雰囲気からすると「ThisWorkbook」のつもりなのかな?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【マクロ】シートの変数へ入れるコードがエラーとなるのはなぜでしょうか? 1 2025/04/27 15:39
- Excel(エクセル) 3つのマクロを連続実行の中で、1つ目のマクロ要件を満たさなかったら、マクロ2・3を実行しない為には 1 2023/10/15 13:42
- Excel(エクセル) 【マクロ】book1からbook2への適切な転記が出来ない件 2 2023/11/08 17:23
- Excel(エクセル) 【マクロ】毎回、ファイル名が変わるファイルへの 文字列の転記 2 2024/05/02 14:17
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2024/03/27 14:27
- Visual Basic(VBA) VBA 複数の各シートに行を追加したいです 2 2024/02/28 22:09
- Visual Basic(VBA) クリップボードに貼付している文字列が、マクロで別ブックへ転記すると、消えてしまう 1 2023/10/15 13:36
- Visual Basic(VBA) Excel VBA マクロ シート名を変えずにA列にあるセル名の名前でファイルの分割をしたいです 3 2024/02/05 22:10
- Excel(エクセル) シート名を簡単に書く方法があれば教えてください。 4 2023/08/24 12:40
- Visual Basic(VBA) VBAに関して 2 2023/11/09 20:57
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
特定のセルだけ結果がおかしい...
-
エクセルのVBAで集計をしたい
-
【関数】同じ関数なのに、エラ...
-
Office2021のエクセルで米国株...
-
【マクロ】【配列】3つのシー...
-
vba テキストボックスとリフト...
-
エクセルのdatedif関数を使って...
-
【画像あり】オートフィルター...
-
【マクロ】アクティブセルの時...
-
【マクロ】列を折りたたみ非表...
-
他のシートの検索
-
【マクロ】3行に上から下に並...
-
【条件付き書式】シートの中で...
-
ページが変なふうに切れる
-
【マクロ】実行時エラー '424':...
-
9月17日でサービス終了らし...
-
エクセル ドロップダウンリスト...
-
【マクロ】オートフィルターの...
-
【マクロ】EXCELで読込したCSV...
-
【マクロ】【相談】Excelブック...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
9月17日でサービス終了らし...
-
エクセル
-
【マクロ】WEBシステムから保存...
-
エクセルの循環参照、?
-
エクセル ドロップダウンリスト...
-
エクセルのdatedif関数を使って...
-
特定のセルだけ結果がおかしい...
-
【マクロ】A列にある、日付(本...
-
【マクロ】EXCELで読込したCSV...
-
【マクロ】アクティブセルの時...
-
【エクセル】期限アラートについて
-
iPhoneのExcelアプリで、別のシ...
-
【関数】同じ関数なのに、エラ...
-
Excelの新しい空白のブックを開...
-
【マクロ】3行に上から下に並...
-
【マクロ】宣言は、何のために...
-
VBA チェックボックスをオーバ...
-
Excelについての質問です 並べ...
-
【マクロ】アクティブセルの2...
-
【関数】不規則な文章から●●-●●...
おすすめ情報