空白前の1つ左のセルに合わせる

質問

セル範囲を設定したいのですがどうすればいいのか教えてください。
　　　C 　 D 　 E 　 F 　 G 　 H I
17 　　 品目　　4月　 5月　 6月 7月　　結果
18 No.1　りんご　 200 50 23 52　 325　　　　　
19　No.1　もも 20 1 53 1　　　75
20　No.1　いちご 23 3　　　26
21　No.1　なし 1 52 　　　 53
22　No.1　バナナ 5 2 7
23　結果　　　　　 226　126 76 58　　 486　

上記のような表があります。
C18からH列の7月の最後の結果表までの範囲　C18：H23　を範囲指定をしたいのです。
しかし行も増える事があり、列も8月・9月と増えて行きます。
途中まではマクロを作成できたのですが、
列の最後の取り方がわかりません。
できれば「結果」という文字の手前での列で
最終行までの範囲を取るにはどうすればいいですか？

Range("$C$18" & Range("C65536").End(xlUp).Row).Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
Selection.Copy

回答No.1

Masa2072 · ベストアンサー

Range("C18", Cells(Range("C18").End(xlDown).Row, Range("D17").End(xlToRight).Column - 1)).Select
というのはどうでしょうか？

お礼

Masa2072様
できました。ありがとうございました。
知らない言葉が増あったので調べてちゃんと理解したいと思います。
ありがとうございました。