行または列の最初/最後の非空白セルを取得する方法は?
日常的なExcel 作業では、一部のセルにのみ値が入力され、他のセルは空白というデータセットに頻繁に遭遇します。こうした場合、特定の行や列で最も最初または最も最後に入力されたセルを素早く特定したいことがよくあります。エントリー数が少なければ簡単ですが、長い行や列では手動で探すのは非効率的で、時間もかかり、ミスも起こりやすくなります。
行または列で最初または最後の非空白セルの値を効率的に取得するための実用的な方法がいくつかあります。これにより、作業を自動化し、貴重な時間を節約できます。以下では、動的範囲や大規模データセットを含むさまざまな実際のシナリオに最適な、数式ベースおよびその他の実践的なソリューションをご紹介します。
Excel のフィルター機能を使って最初または最後の非空白セルを見つける
数式で行または列の最初の非空白セルを返す
行または列からデータを含む最初のセルを抽出するには、INDEX 関数とMATCH 関数を組み合わせるのが効果的です。この方法は、元のデータが変更されてもワークシートを動的に保ちながら、値をプログラムで取得したい場合に最適です。以下の手順で実行してください。
1。データ範囲の隣にある空白セルに、次の数式を入力してください。
=INDEX(A1:A13,MATCH(TRUE,INDEX((A1:A13<>0),0),0)) たとえば、データがセル A1 から A13 にある場合、この数式は最初の非空白かつ非ゼロのセルを返します。以下の例をご覧ください。

2。Enterキーを押すと、範囲内で空白でない(または数式のロジックに基づきゼロでない)最初のセルの値が次のように表示されます。

注記とヒント:
- 上記の数式では、A1:A13を任意の列または行を参照するように調整できます(たとえば、1 行全体を参照する場合は)1:1、行の一部区間を参照する場合はB2:M2など)。
- この方法は、単一行または単一列に対して確実に機能します。テーブルや複数の選択範囲を使用する場合は、各行または各列に個別に数式を適用することをご検討ください。
- 数式がエラー()#N/A)を返す場合は、指定した範囲内に空白でもゼロでもないセルが少なくとも1 つ実際に含まれているか、再度ご確認ください。
- 真の空白(「」)を扱う際、ゼロではなく空のセルだけを無視したい場合は、
0を""に置き換えてください。

KUTOOLS AI でExcel の魔法を解き放ちましょう
- スマート実行:セル操作、データ分析、チャート作成をすべてシンプルなコマンドで実現します。
- カスタム数式:ワークフローの効率化に役立つ、あなただけのカスタマイズ数式を生成します。
- VBA コーディング:VBA コードを簡単に記述・実装できます。
- 数式の解釈:複雑な数式が簡単に理解できます。
- テキスト翻訳:スプレッドシート内で言語の壁を乗り越えましょう!
数式で行または列の最後の非空白セルを返す
指定範囲内の最後の非空白セルの値を取得するには、配列ベースのLOOKUP 数式が、動的または変化するデータに対してシンプルで効率的なソリューションを提供します。特に、リストや集計表で最新のデータエントリーを自動的に特定したい場合に最適です。
1。対象範囲の横にある空白セルに、次の数式を入力してください。
=LOOKUP(2,1/(A1:A13<>""),A1:A13) この数式は指定された範囲内をスキャンし、空でない最後のセルの値を返します。たとえば、範囲としてA1:A13を使用する場合:

2。Enterキーを押すと、Excel が計算を実行し、最後の非空白セルの値を次のように表示します。
注記と提案:
- この数式は、任意の単一列または単一行()B1:B20、F8:F30、または2:2など)でご利用いただけます。必要に応じて、範囲参照を更新してください。
- データに無視したいゼロが含まれる場合は、
A1:A13""をA1:A130に置き換えることができます。ただし、真の空白とゼロの扱いが意図通りかどうか、十分ご注意ください。 - このアプローチはシンプルな範囲に最適です。数式で「""(空文字)」を返すセルを含む範囲では、そのようなセルを空白として扱います。
- すべてのセルが空白の場合、数式は#N/Aエラーを返します。
VBA マクロで最初または最後の非空白セルの値を返す
大規模なデータセットを扱う方や、繰り返し作業の自動化を検討している方にとって、シンプルな VBA マクロは業務プロセスを大幅に効率化します。特に、範囲が可変的であったり、多数の行や列を含むケースでその真価を発揮します。数式とは異なり、VBA は「最初または最後の非空白セルを検索する」など、オンデマンドでの処理が可能。そのため、複数の範囲にわたる繰り返し操作にも最適です。
1。開発タブのVisual Basicをクリックして VBA エディターを開きます。表示された VBA ウィンドウで、挿入から標準モジュールを選択し、次のいずれかのプロシージャをモジュールウィンドウに貼り付けてください。
マクロ:最初の範囲を選択してくださいの非空白セルを検索する:
Sub FindFirstNonBlankCell()
Dim rng As Range
Dim cell As Range
Dim firstValue As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select range", xTitleId, rng.Address, Type:=8)
firstValue = ""
For Each cell In rng
If cell.Value <> "" Then
firstValue = cell.Value
Exit For
End If
Next cell
If firstValue <> "" Then
MsgBox "The first non blank cell value is: " & firstValue, vbInformation, xTitleId
Else
MsgBox "No non blank cells found.", vbExclamation, xTitleId
End If
End Sub 同様に、最後の非空白セルを検索するコードは次のとおりです。最後の非空白セル:
Sub FindLastNonBlankCell()
Dim rng As Range
Dim cell As Range
Dim lastValue As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select range", xTitleId, rng.Address, Type:=8)
lastValue = ""
For Each cell In rng
If cell.Value <> "" Then
lastValue = cell.Value
End If
Next cell
If lastValue <> "" Then
MsgBox "The last non blank cell value is: " & lastValue, vbInformation, xTitleId
Else
MsgBox "No non blank cells found.", vbExclamation, xTitleId
End If
End Sub 2。コードを実行するには、VBA エディターの実行ボタン
をクリックしてください。すると、非空白セルを検索する対象範囲の選択を求めるプロンプトが表示されます。範囲を選択して確定すると、実行したマクロに応じて、最初または最後の非空白セルの値がダイアログボックスに表示されます。
- これらのマクロは柔軟性に優れ、データ量の大小を問わず、行・列のどちらにも対応可能です。
- VBA を使えば自動化や繰り返し処理が可能になるため、頻繁に行う作業や大規模なタスクに最適です。
- マクロを実行する際は、必ずブックを保存し、必要に応じてマクロを有効にしてください。重要なデータに適用する前に、サンプルデータでその正確性を確認することを強くおすすめします。
Excel のフィルター機能を使って最初または最後の非空白セルを見つける
大量の行データを含む列で非空白値をすばやく視覚的に特定したいユーザーにとって、Excel に内蔵されたフィルター機能を使えば、非空白エントリーが一目でわかります。この方法では値を別のセルに自動で返しませんが、データ分析中のレビューおよびナビゲーションには非常に効果的です。
フィルター機能を使って、最初または最後の非空白セルを視覚的に特定する手順は次のとおりです。
- データを含む列または行を選択してください。フィルターをかけやすくするには、列全体(たとえば、列のアルファベットをクリック)を選択してもかまいません。
- データタブをクリックし、続いてフィルターを選択します。
- 範囲またはテーブルのヘッダーにある小さなフィルター矢印をクリックしてください。
- (空白)オプションのチェックを外すと、入力済みのセルだけが表示されます。
- フィルター適用後、列の先頭に表示される最初の可視セルは最初の非空白セルです。最後の非空白セルを確認するには、下までスクロールしてください。
メリット:フィルター方式なら、数式不要で素早く処理でき、数千行にも及ぶ列データにぴったりです。
デメリット:この方法は視覚的な結果のみを提供するため、数式や VBA のようにセルに出力したり自動化したりすることはできません。ただし、手動での確認・レビュー、インタラクティブなデータ探索には最適です。
トラブルシューティングと提案:
フィルターが正しく動作しない場合は、データの一部だけが選択されていないか確認してください。範囲を誤って選択すると、フィルターが正しく適用されないことがあります。作業終了後は、データ > クリアをクリックしてフィルターを解除し、完全なデータセットビューを復元してください。
最高の Office 業務効率化ツール
| 🤖 | KUTOOLS AI アシスタント:次に基づいてデータ分析を革新します:インテリジェント実行 | コード生成| カスタム数式作成 | データ分析とチャート生成| 拡張機能呼び出し… |
| 人気の機能:検索・ハイライト、または重複をマーキング | 空白行を削除する | データを失うことなく列の結合またはセルを | 数式を使用しない四捨五入... | |
| スーパー LOOKUP:複数条件 VLookup | 複数値 VLookup | 複数シート間 VLookup | ファジーマッチ.... | |
| 高度なドロップダウンリスト:ドロップダウンリストをすばやく作成 | 連動型ドロップダウンリスト | 複数選択可能なドロップダウンリスト.... | |
| 列マネージャー:指定した数の列を追加|列の移動|非表示列の表示状態を切り替え|範囲および列の比較... | |
| 注目の機能:グリッドフォーカス | デザインビュー |強化された数式バー | ワークブックとシートマネージャー | リソースライブラリ(オートテキスト)| 日付ピッカー | ワークシートの統合 | 暗号化/セルの復号化 | リストからメール送信 | スーパーフィルター | 特殊フィルタ(太字のフォントを持つセルをフィルタリング/斜体/取り消し線。。。) 。。。 | |
| トップ15 ツールセット:12 テキストツール(テキストの追加、特定の文字を削除、...)| 50+チャートタイプ(ガントチャート、...)| 40+実用的関数(誕生日に基づいて年齢を計算します、...)| 19 挿入ツール(QR コードを挿入、パスから画像を挿入、...)| 12 変換ツール(単語に変換する、為替レートの変換、...)| 7 結合と分割ツール(高度な行のマージ、セルの分割、...)|さらに多数 |
Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。
Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします
- Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
- 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
- 日々の生産性を50%も向上させ、毎日数百回ものマウスクリックを削減します!
すべてのKutools アドインが、たった1 つのインストーラーで完結。
Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。
- オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン+Office Tab Pro
- インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能(MSI 対応)
- 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
- 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
- 最高のお得感— 個別アドイン購入よりお得