Excel で2 つの日付間のすべての日付を一覧表示するには、どうすればよいですか?
場合によっては、特定の開始日と終了日が与えられた際に、Excel でその2 つの日付の間に含まれるすべての日付を一覧表示する必要があります。このチュートリアルでは、Excel で2 つの日付間のすべての日付を一覧表示する方法をご紹介します。
Kutools for Excel を使用して2 つの日付間のすべての日付を一覧表示![]()
数式を使用して2 つの日付間のすべての日付を一覧表示
ここでは、Excel で指定した2 つの日付の間にあるすべての日付をすばやく一覧表示できる数式をご紹介します。
1。開始日と終了日をそれぞれセル A1 と A2 に入力してください。スクリーンショットをご参照ください:
2。次に、セル C1 に移動し、次の数式を入力します。=A1+1を入力してEnterキーを押してください。スクリーンショットを参照してください:
3。次に、セル C2 に次の数式を入力します。=IF($A$1+ROW(A1)>=$A$2-1,「」,C1+1)を入力し、空白セルが表示されるまでオートフィルハンドルを下方向にドラッグしてください。スクリーンショットを参照してください:

すると、指定した2 つの日付の間にあるすべての日付が列に一覧表示されます。
注:
上記の数式において、A1 は開始日、A2 は終了日、C1 は日付範囲の最初の日付です。
Kutools for Excel を使用して2 つの日付間のすべての日付を一覧表示
実は、Kutools for Excel(便利なアドインツール)をインストール済みなら、ランダムデータを挿入する機能でこの問題を簡単に解決できます。
Kutools for Excel を無料でインストールした後、以下の手順を実行してください:
1。2 つの日付の間にある日付を一覧表示したい列を選択し、Kutools>挿入>ランダムデータを挿入するをクリックします。スクリーンショットを参照してください:
2。次に、ランダムデータを挿入するダイアログで、日付タブをクリックし、FromおよびToリストから開始日と終了日を選択してください。さらに、営業日、週末、および重複なしの各チェックボックスをオンにします。スクリーンショットを参照してください:
3。「OK」をクリックしてダイアログを閉じると、別のKutools for Excelダイアログが表示されます。「はい」をクリックすると、開始日と終了日の間の日付が一覧表示されます。スクリーンショットを参照してください:

4。次に、日付リストを必要な順序で並べ替える必要があります。「データ>古い順に並べ替え」をクリックすると、日付が古い順から新しい順に並べ替えられます。スクリーンショットを参照してください:

ランダムデータを挿入するユーティリティを使えば、ランダムな整数や文字列、時刻などを簡単に挿入できます。「ランダムデータを挿入する」の詳細については、こちらをクリックしてください。
VBA を使用して2 つの日付間のすべての日付を一覧表示
マクロコードに興味がある場合は、以下の VBA を使用して、Excel で指定された2 つの日付の間にあるすべての日付を一覧表示できます。
1。開始日と終了日をそれぞれ2 つのセル(ここではセル A1 と B1)に入力してください。スクリーンショットをご参照ください:
2。「Alt+F11」キーを押すと、Microsoft Visual Basic for Applicationsウィンドウが開きます。
3。「挿入」>「標準モジュール」をクリックし、表示される標準モジュールウィンドウに以下の VBA コードをコピー&ペーストしてください。
VBA:2 つの日付間のすべての日付を一覧表示
Sub WriteDates()
'Updateby20150305
Dim rng As Range
Dim StartRng As Range
Dim EndRng As Range
Dim OutRng As Range
Dim StartValue As Variant
Dim EndValue As Variant
xTitleId = "KutoolsforExcel"
Set StartRng = Application.Selection
Set StartRng = Application.InputBox("Start Range (single cell):", xTitleId, StartRng.Address, Type: = 8)
Set EndRng = Application.InputBox("End Range (single cell):", xTitleId, Type: = 8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
Set OutRng = OutRng.Range("A1")
StartValue = StartRng.Range("A1").Value
EndValue = EndRng.Range("A1").Value
If EndValue - StartValue <= 0 Then
Exit Sub
End If
ColIndex = 0
For i = StartValue To EndValue
OutRng.Offset(ColIndex, 0) = i
ColIndex = ColIndex + 1
Next
End Sub 4。「実行」をクリックするか、F5キーを押して VBA を実行すると、開始日を選択するダイアログが表示されます。続いて「OK」をクリックし、2 つ目のダイアログで終了日を選択してください。スクリーンショットを参照してください:

5。「OK」をクリックし、日付を出力するセルを選択してから「OK」をクリックすると、2 つの日付間のすべての日付が一覧表示されます。スクリーンショットを参照してください:

注:この VBA で生成されるリストには、開始日と終了日が含まれます。
2 つの日付間のすべての日付を一覧表示
関連記事:
最高の 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 日間のフル機能トライアル— 登録不要、クレジットカード不要
- 最高のお得感— 個別アドイン購入よりお得