【Excel】8桁の数字（YYYYMMDD）を日付に変換する方法｜関数・区切り位置・VBA

みなさんこんにちは。

Excelを使用していると、

20260905

のように、8桁の数字で日付が入力されているデータを扱うことがあります。

見た目では日付と分かりますが、この状態ではExcel上で日付として認識されていないため、表示形式の変更や日付計算がうまくできない場合があります。

今回は、8桁の数字（YYYYMMDD）をExcelの日付形式へ変換する方法について、

関数を使用する方法
「区切り位置」を使用する方法
VBAを使用する方法

の3パターンをご紹介したいと思います。

この記事はこんな人におすすめ

この記事はこんな人におすすめです！

20260905のような8桁の数字を日付に変換したい人
Excel関数だけで変換したい人
大量のデータをまとめて日付へ変換したい人
VBAを使用して自動で日付変換したい人

といったところでしょうか。

変換前のデータについて

今回は、A列に下記のような8桁の日付データが入力されているものとします。

20260905

このデータを、

2026/9/5

のようなExcelの日付データへ変換していきます。

関数を使用して8桁の数字を日付に変換する方法

まずはExcel関数を使用する方法です。

A2セルに「20260905」と入力されている場合は、B2セルに下記の関数を入力してください。

=DATE(LEFT(A2,4),MID(A2,5,2),RIGHT(A2,2))

それぞれ、

LEFT関数で先頭4桁の「年」を取得
MID関数で5桁目から2文字の「月」を取得
RIGHT関数で末尾2桁の「日」を取得

し、DATE関数でExcelの日付データへ変換しています。

関数を入力すると、

2026/9/5

のように日付として表示されます。

数件程度のデータや、元の8桁データを残したまま別列へ日付を表示したい場合は、この方法が一番簡単かと思います。

「区切り位置」を使用して日付に変換する方法

関数を使用せず、Excelの「区切り位置」機能を使用して変換することも可能です。

まず、8桁の数字が入力されているセルを選択します。

Excel上部のメニューから、

「データ」→「区切り位置」

をクリックしてください。

区切り位置指定ウィザードが表示されたら、そのまま進めて、最後の画面にある「列のデータ形式」で、

「日付」→「YMD」

を選択します。

最後に「完了」をクリックすると、8桁の数字がExcelの日付データへ変換されます。

関数を残したくない場合や、既存データをそのまま日付へ変換したい場合については、この方法が便利です。

VBAを使用して8桁の数字を日付に変換する方法

大量のデータを定期的に変換する場合は、VBAで自動化する方法もあります。

下記のコードでは、選択したセルの中から8桁の数字を判定し、日付へ変換します。

Sub YYYYMMDDを日付に変換()

    Dim cell As Range
    Dim strDate As String
    Dim convertDate As String

    For Each cell In Selection

        strDate = CStr(cell.Value)

        If Len(strDate) = 8 And IsNumeric(strDate) Then

            convertDate = Left(strDate, 4) & "/" & _
                          Mid(strDate, 5, 2) & "/" & _
                          Right(strDate, 2)

            If IsDate(convertDate) Then
                cell.Value = CDate(convertDate)
                cell.NumberFormatLocal = "yyyy/m/d"
            End If

        End If

    Next cell

End Sub

実行する際は、日付へ変換したいセル範囲を選択した状態でマクロを実行してください。