メインコンテンツへスキップ

Excelで新しい値が表示または到達されるまで、セルの値を繰り返すにはどうすればよいですか?

左のスクリーンショットに示すように、Excelの列に新しい値が表示されるか到達するまで、セルの値を繰り返す必要があります。 この場合、値Bに達するまで次の空白セルで値Aを繰り返し、値Cが表示されるまで値Bを繰り返す必要があります。 それを達成する方法は? この記事はあなたを助けます。

新しい値が表示されるか、数式で到達するまで、セルの値を繰り返します
上記の値を参照して新しい値が表示または到達するまで、セル値を繰り返します
新しい値が表示されるか、VBAコードで到達するまで、セルの値を繰り返します
数回クリックするだけで新しい値が表示または到達するまで、セル値を簡単に繰り返すことができます


新しい値が表示されるか、数式で到達するまで、セルの値を繰り返します

数式を使用して、Excelに新しい値が表示されるまでセル値を繰り返すことができます。 次のようにしてください。

1.新しい列で、値を繰り返す必要があるセル(E2)に隣接する空白のセルを選択し、数式を入力します = E2 数式バーに移動し、Enterキーを押します。 スクリーンショットを参照してください:

2.ヘルプ列で次のセル(F3)を選択し、数式を入力します = IF(E3 = ""、F2、E3) 数式バーに入力し、を押します 入力します キー。

3.セルF3を選択し続け、塗りつぶしハンドルを下にドラッグして、新しい値が表示されるまですべてのセル値を繰り返します。 スクリーンショットを参照してください:


Excelで新しい値に達するまで、セルの値を簡単に繰り返します。

また, 空白のセルを埋める の有用性 Kutools for Excel 以下のスクリーンショットに示すように、Excelで新しい値が表示または到達されるまで、リスト内のセル値を繰り返すのに役立ちます。
今すぐダウンロードして試してください! (30日間の無料トレイル)


上記の値を参照して新しい値が表示または到達するまで、セル値を繰り返します

上記の数式に加えて、最初にすべての空白セルを選択してから、上記のすべての値を参照して、空白セルにショートカットキーを入力できます。

1.セル値を繰り返す必要がある列を選択し、を押します。 F5 キーを開く へ行きます ダイアログボックスをクリックし、 スペシャル

2。 の中に 特別に行く ダイアログボックスで ブランク オプションを選択し、 OK ボタン。 スクリーンショットを参照してください:

3.これで、選択した列のすべての空白セルが選択されました。等号を入力してください =、上矢印キーをXNUMX回押してから、 Ctrlキー + 入力します キーを同時に押す。

次に、下のスクリーンショットのように新しい値が表示されるまで、選択した列のセル値が繰り返されていることがわかります。


新しい値が表示されるか、VBAコードで到達するまで、セルの値を繰り返します

次のVBAコードは、Excelの特定の列に新しい値が表示されるまでセル値を繰り返すのにも役立ちます。

1.新しい値が表示されるまでセル値を繰り返す必要がある列範囲を選択し、を押します。 他の + F11 キーを同時に開いて アプリケーション向け Microsoft Visual Basic 窓。

2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール。 次に、以下のVBAコードをコピーしてモジュールウィンドウに貼り付けます。

VBAコード:Excelに新しい値が表示されるまで、セルの値を繰り返します

Sub FillDown()
Dim xRng As Range
Dim xRows As Long, xCols As Long
Dim xRow As Integer, xCol As Integer
Set xRng = Selection
xCols = xRng.Columns.CountLarge
xRows = xRng.Rows.CountLarge
For xCol = 1 To xCols
  For xRow = 1 To xRows - 1
    If xRng.Cells(xRow, xCol) <> "" Then
      xRng.Cells(xRow, xCol) = xRng.Cells(xRow, xCol).Value
      If xRng.Cells(xRow + 1, xCol) = "" Then
        xRng.Cells(xRow + 1, xCol) = xRng.Cells(xRow, xCol).Value
      End If
    End If
  Next xRow
Next xCol
End Sub

3。 プレス F5 コードを実行するためのキー。 次に、選択した列範囲のすべての空白セルに、上記の値がすぐに入力されます。


数回クリックするだけで新しい値が表示または到達するまで、セル値を簡単に繰り返すことができます

このセクションでは、 空白のセルを埋める の有用性 Kutools for Excel。 このユーティリティを使用すると、数回クリックするだけで新しい値が表示されるまで、セルの値を簡単に繰り返すことができます。

申請する前に Kutools for Excelについては 最初にダウンロードしてインストールします.

1.セル値を繰り返す必要がある列範囲を選択し、をクリックします クツール > インセット > 空白のセルを埋める。 スクリーンショットを参照してください:

2。 の中に 空白のセルを埋める ダイアログボックスで 値に基づく セクションに で埋める セクションでは、選択 Down 内のオプション オプション セクションをクリックし、最後に OK ボタン。 スクリーンショットを参照してください:

次に、下のスクリーンショットに示すように、すべての空白セルがすぐに上のセル値で埋められます。

  このユーティリティの無料トライアル(30日)が必要な場合は、 クリックしてダウンロードしてください、次に、上記の手順に従って操作を適用します。


デモ:Kutools for Excelで新しい値が表示されるか到達するまで、セル値を簡単に繰り返す


関連記事:

最高のオフィス生産性向上ツール

人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup    複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー    ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化    リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット12 テキスト 工具 (テキストを追加, 文字を削除する、...)   |   50+ チャート 種類 (ガントチャート、...)   |   40+ 実用的 (誕生日に基づいて年齢を計算する、...)   |   19 挿入 工具 (QRコードを挿入, パスから画像を挿入、...)   |   12 変換 工具 (数字から言葉へ, 通貨の換算、...)   |   7 マージ&スプリット 工具 (高度な結合行, 分割セル、...)   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

kteタブ201905


Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Once I changed the formula in step 2 for cell F3 to be =IF(E2="",F2,E2), it worked perfectly.
This comment was minimized by the moderator on the site
Thanks a ton, this works just perfect!
This comment was minimized by the moderator on the site
Thank you bro. It works
This comment was minimized by the moderator on the site
Unter Office 365 (Excel 2016) funktioniert dieses Kutools for Excel nicht, um die Zellenwerte zu wiederholen und Excel hängt sich auf und reagiert nicht mehr
This comment was minimized by the moderator on the site
Dim xRow As Long, xCol As Long
if you have a very large dataset
This comment was minimized by the moderator on the site
Thanks a lot , fantastic
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations