こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

エクセルVBAで最終行取得方法

エクセルVBAで最終行を取得する良い方法を教えて下さい。
VBA初心者でいきづまっていまして、、、

内容はボタンを押した時にF列に対して最終行を取得して、
その最終行の下のセルにボタンの内容が繁栄させるようにしたくて

Private Sub CommandButton202_Click()
Dim lastRow As Long

lastRow = Cells(Rows.Count, 6).End(xlUp).Row + 1
Cells(lastRow, 6).Value = CommandButton202.Caption

End Sub

と作ってみたのですが、F17より下に文字がはいっているため、
検索範囲を「F列」ではなく、「F2:F16」のように範囲を指定したいのですがどうしたらよいでしょうか、、、。

結構色々調べてはみたのですができなくて、、、

投稿日時 - 2013-08-22 11:47:24

QNo.8230617

すぐに回答ほしいです

このQ&Aは役に立ちましたか?

1人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

3行目の lastRowの行を、

lastRow = Range("F16").End(xlUp).Row + 1

としてみてください。

投稿日時 - 2013-08-22 16:56:30

あなたにオススメの質問