[[20141115154140]] 『セル選択』(syo) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『セル選択』(syo)

 お世話になります。
 3列を選択(select)したいのですが
 毎回最終行が変化します。
 マクロの記録では以下の記述となります。
 Range("I2:I1478,AK2:AK1478,BF2:BF1478").Select
 毎回最終行が変わるので、以下記述をしましたが
 エラーとなります。

 i = Sheets("***").Cells(Rows.Count, 1).End(xlUp).Row
 Range("I2:I" & i, "AK2:AK" & i, "BF2:BF" & i).Select

 どのように記述するか教えていただけませんか?

< 使用 Excel:unknown、使用 OS:unknown >


 Range("I2:I" & i, "AK2:AK" & i, "BF2:BF" & i).Select
 の部分を
 Range("I2:I" & i & ", AK2:AK" & i & ", BF2:BF" & i).Select

 にしてみてください。
(se_9) 2014/11/15(土) 15:54 修正15:58

se_9さん

ありがとうございます。
ちゃんと動きました。
(syo) 2014/11/16(日) 00:11


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.