質問: Excelのマクロについて質問です。初心者勉強中です。 同じ書式のファイル(1ブックにシート4枚)が2つあり、マスタファイルのD1:D10に、指定したファイルのD1:D10の情報を転記するマクロを作っています。 黄色線の部分が「オブジェクトはこのプロパティまたはメソッドをサポートしていません」とエラーメッセージが出ます。 どこをどう修正すればいいのでしょうか? ちなみに、今後転記するファイルはどんどん増えていくため、変数を使って様々な事情に対応できるようにと考えました。 よろしくお願いします。
回答: WorksheetはWorkBookにぶら下がっています。 同様にRangeはSheetにぶら下がっています。 例えば、 Sheet1のRangeをSheet2にSetすることはできません。 (Worksheetも同様です) よって dim ws1 as String dim ran as String ws1 = "Sheet1" ran = "D1:D10" mwb.WorkSheets(ws1).Range(ran).value = _ wb.WorkSheets(ws1).Range(ran).value こんな感じでしょうか。 (画像がよく見えないのでスペル違ったらごめんなさい)