ＶＢＡ 行の高さのコピー

いつもお世話になっております

下記のコードは　行の幅の高さをコピーするものですが、
For c = 3To 8
.Rows(c).RowHeight = Worksheets(a).Rows(c).RowHeight
Next c

添付ファイルのように
3行目から8行目までの行の高さを

10行目にコピーするにはどうしたら
いいのでしょうか。

わかる方おしえてくれませんでしょうか

また、range("B3:D8")
という　範囲を指定した書き方は
できないものなのでしょうか。

質問者からの補足コメント

• 添付ファイルです。
  わかる方おしえてくれませんでしょうか

  
    補足日時：2022/02/16 21:08

No.3 回答者： Qchan1962 回答日時： 2022/02/16 21:55

＃2です

ごめんなさい。＃２は違いますね
ループで1行づつかな。。。

この回答へのお礼

ありがとうございました。

お礼日時：2022/02/19 22:33

No.2 回答者： Qchan1962 回答日時： 2022/02/16 21:50

こんばんは

こういう事？
Rows("10:15").RowHeight = Rows("3:8").RowHeight

この回答へのお礼

いつもお世話になっております
検索したしたら、ありました。
ありがとうございました。

お礼日時：2022/02/16 21:55

No.1 回答者： t_fumiaki 回答日時： 2022/02/16 21:35

3行目から8行目までの行数は6行ある。

それを10行目の1行にコピーするとは、一体ドーユー事なんだい？？

この回答へのお礼

ありがとうございました。

お礼日時：2022/02/16 21:54