VBA学習ツール無料配布！#13 テーマ:vbaで最下行を取得

本学習テーマ紹介動画

👆本学習テーマをYouTubeで紹介しています！
チャンネル登録宜しくお願いします！
効果音ラボ　ナレーション 音読さん

＊基本的に, 記事投稿日翌日夜18:30頃から, 動画を閲覧できます。

本学習ツールでの問題文・解答例

問題文
以下の要件を満たすVBAのプログラムを実装して下さい。

要件

解答例

Option Explicit

Sub correctAnswerExample()
    Dim ws As Worksheet
    Dim lastRow As Long
    ' 「読み込みシート」を設定する
    Set ws = ThisWorkbook.Sheets("読み込みシート")
    ' B列の最後の行を取得する
    lastRow = ws.Cells(ws.Rows.Count, 2).End(xlUp).Row
    ' 最下行をメッセージボックスで表示する
    MsgBox "B列の最下行: " & lastRow
End Sub

上のプログラムが実際に動く様子は, 下の学習ツールをダウンロードして, 確認してみて下さい！

本学習ツールの内容

下👇の画像のように, vbaで最下行を取得する方法を学ぶことが出来ます！

＊2枚目の「正答シート」の画像は, 学習前に答えを知りたくない方は飛ばして見て頂くようお願い致します。

本学習テーマの格言

• 最下行取得は, for文に必須！
  • for文を使う際には最下行が必要になる場面が数多くあります！最下行取得をマスターして, for文の学習につなげましょう！

VBA設定

尚, 本ツールには, 「VBA」（Excelのプログラミング言語）が組み込まれている為, 以下のマニュアルに従った設定・エラー時の対処が必要となります。

ダウンロード

ぜひ, 勉強にご活用下さい！👇