VBAを使用してExcelシートの最後の行に移動する方法

Microsoft Excelの優れた点の1つは、便利な機能を自動化する機能です。 ビジネススプレッドシートに何百、何千もの行が含まれていると、セルを操作するのが困難になることがあります。 独自の検索機能を構築することによってこの問題を解決してください。 数行のコードを使用して、スプレッドシートの最後の行を見つけて自動的に移動するVBA Subを作成できます。

1。

Excelを起動し、複数の列を含むスプレッドシートを開きます。

2。

「Alt-F11」を押して「Visual Basic」エディタを開き、「挿入」をクリックします。 VBAは、プロジェクトウィンドウに新しいモジュールを追加します。

3。

プロジェクトウィンドウの右側に表示される編集ウィンドウに次のコードを貼り付けます。

Sub SelectLastRow()Integer As Dim finalRow

finalRow = ActiveSheet.UsedRange.Rows.Count

finalRow = 0の場合そしてfinalRow = 1の場合

行(finalRow)。選択End Sub

このSubは、行コレクションのCountプロパティを調べてスプレッドシートの最後の行を決定します。 その後、Subはその値をfinalRow変数に格納します。 Subの最後のステートメントは、finalRowの値をVBAのSelectメソッドに渡します。

4。

「F5」を押してSubを実行します。 Selectメソッドは、スプレッドシートの最後の行を見つけ、その行に移動してそれを強調表示します。

先端

  • Rows(finalRow).Selectコマンドは、スプレッドシート内の任意の行にジャンプするのに役立ちます。 finalRowの値を1などの別の値に設定した場合、Selectコマンドは実行時にその行に移動します。

人気の投稿