Note: The other languages of the website are Google-translated. Back to English

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。 の中に 空白のセルを埋める ダイアログボックスで 値に基づく で埋める セクションでは、選択 値下がり 内のオプション オプション セクションをクリックし、最後に OK ボタン。 スクリーンショットを参照してください:

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

  無料トライアルをご希望の方は(30-day) このユーティリティの クリックしてダウンロードしてください、次に、上記の手順に従って操作を適用します。


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


関連記事:


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

Kutools for Excelはほとんどの問題を解決し、生産性を80%向上させます

  • 再利用: すばやく挿入 複雑な数式、チャート および以前に使用したものすべて。 セルを暗号化する パスワード付き。 メーリングリストを作成する そしてメールを送る...
  • スーパーフォーミュラバー (複数行のテキストと数式を簡単に編集できます); 読書レイアウト (多数のセルを簡単に読み取って編集する); フィルター範囲に貼り付け...
  • セル/行/列をマージする データを失うことなく; 分割セルコンテンツ; 重複する行/列を組み合わせる...重複セルを防止します。 範囲を比較する...
  • [複製]または[一意]を選択します 行; 空白行を選択 (すべてのセルは空です); スーパーファインドとファジーファインド 多くのワークブックで; ランダム選択...
  • 正確なコピー 数式参照を変更せずに複数のセル。 参照の自動作成 複数のシートに; 箇条書きを挿入、チェックボックスなど...
  • テキストを抽出、テキストの追加、位置による削除、 スペースを削除する; ページング小計の作成と印刷。 セルの内容とコメントを変換する...
  • スーパーフィルター (フィルタースキームを保存して他のシートに適用します); 高度な並べ替え 月/週/日、頻度など。 特殊フィルター 太字、斜体...
  • ワークブックとワークシートを組み合わせる; キー列に基づいてテーブルをマージします。 データを複数のシートに分割; xls、xlsx、PDFをバッチ変換...
  • 300 以上の強力な機能. Office / Excel 2007-2021 および 365 をサポートします。すべての言語をサポートします。 企業や組織に簡単に導入できます。 フル機能の 30 日間無料トライアル。 60日間の返金保証。
kteタブ201905

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

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
officetab下部
コメントを並べ替える
コメント (6)
まだ評価はありません。 最初に評価してください!
このコメントは、サイトのモデレーターによって最小化されました
どうもありがとう、素晴らしい
このコメントは、サイトのモデレーターによって最小化されました
xRow As Long、xColAsLongを暗くします
非常に大きなデータセットがある場合
このコメントは、サイトのモデレーターによって最小化されました
Unter Office 365(Excel 2016)funktioniert dieses Kutools for Excel nicht、um die Zellenwerte zuwiederholenundExcelhängtsichaufundreagiert nicht mehr
このコメントは、サイトのモデレーターによって最小化されました
仲間ありがとう。 できます
このコメントは、サイトのモデレーターによって最小化されました
たくさんのおかげで、これは完璧に機能します!
このコメントは、サイトのモデレーターによって最小化されました
手順2でセルF3の数式を=IF(E2 = ""、F2、E2)に変更すると、完全に機能しました。
ここにはまだコメントが投稿されていません
あなたのコメントを残す
ゲストとして投稿
×
この投稿を評価:
0   文字
推奨される場所

フォローする

著作権©の2009 - WWW。extendoffice.com。 | | 全著作権所有。 搭載 ExtendOffice。 | サイトマップ
MicrosoftおよびOfficeのロゴは、米国MicrosoftCorporationの米国およびその他の国における商標または登録商標です。
SectigoSSLで保護