Excelのマクロについて教えてください。

マクロのコード内に
指定セル値設定しておりますが、
例えば
add = .Range("V1").Value
omail.Subject = .Range("AG1") '件名
& .Range("AG3").Value & vbCrLf _
のコードがあります。
このコードのままだと
作業シートに指定セルを設定する事が必要ですが、
このコードの指定シートを
「省エネリスト」
と指定できる方法を教えてください。
よろしくお願いいたします。

No.1 ベストアンサー 回答者： shut0325 回答日時： 2025/02/21 12:49

withブロックの記述ですよね？

ターゲットをアクティブシートではなく、「省エネリスト」シートにすればよいかと思います。


Dim ws As Worksheet

Set ws = ThisWorkbook.Sheets("省エネリスト")

With ws ~~~





End With

という感じです。

この回答へのお礼

回答ありがとうございました。
上手くできました。

お礼日時：2025/02/21 13:03