Excelで文字化けになる原因と直す方法！CSVも！

けど、そんな中で悩むことは、

ですよね。

今回はそんなお悩みを解決する

についてまとめます！

完成イメージ

CSVの文字化けは、ファイルの中身が壊れているわけではありません。
原因のほとんどは「文字コードの食い違い」です。
今回は
・文字化けが起きる3つの原因と、正しく取り込む方法（データ→テキストファイル・区切り位置・VBA）
をゴールにします。
原因が切り分けられれば、どのCSVでも落ち着いて対処できるようになります。

なお、半角カナと全角カナの見分け方や、VBAで文字コードを指定して開く方法、うまくいかないときの対処法（トラブルシュート）もあわせてご紹介します。
早速実装して試してみましょう！

上の画像が完成形です。文字化けしていた氏名と部署が、正しい日本語で表示されています。

STEP1. 元のデータを用意する

まずは取り込みたい商品マスタのサンプルを用意します。
1行目が見出し、2行目以降がデータで、8件あります。
A列が商品コード、B列が氏名、C列は部署です。
商品コードは半角の英数字なので、文字コードが違っても化けません。
逆に、B列とC列の日本語は文字コードの影響をもろに受けます。
この「正しい状態」を基準にして、次の文字化けと見比べていきましょう。

下の表をコピーして、Excelのシートに貼り付けるとそのまま試せます。

※ 数式で求める列は空にしています。すでに値が入っている列はそのまま残して試せます。

STEP2. 文字化けした状態を確認する

次が、同じCSVをそのまま開いてしまったときの状態です。
下の段が、文字化けしたときの表示です。
「田中 健」が「逕ｰ荳ｭ 蛛･」、「営業部」が「蝟ｶ讌ｭ驛ｨ」になっています。
これは、ファイルの中身が壊れたのではありません。
UTF-8で保存された文字を、ExcelがShift_JISとして読んだために起きています。
化けるのは日本語の部分だけで、英数字の商品コードはそのまま残るのが特徴です。

STEP3. 文字化けが起きる3つの原因

文字化けの原因は、大きく3つに分けられます。
まずは、自分の症状がどれに当てはまるかを切り分けましょう。

文字化けの3つの原因

原因③ 半角と全角の違いを見分ける

半角カナは、文字コードの食い違いではありません。
「半角で入力された文字」がそのまま残っているだけです。
下の表は、半角カナと全角カナを並べたものです。
左の「ﾊﾝﾊﾞｲ」が半角、右の「ハンバイ」が全角です。
見た目は似ていても、データとしては別の文字として扱われます。
化けているのか、半角なだけなのかを、まず見分けましょう。

STEP4. 対処① 文字コードを指定して開き直す

いちばん確実なのが、文字コードを指定して開き直す方法です。
CSVをダブルクリックで開かず、Excelの「データ」タブから取り込みます。
手順は次のとおりです。
① Excelを起動し、空のブックを開きます。
② データ タブ → データの取得 → テキストファイル（またはCSV）を選びます。
③ 保存先からCSVを選び、「インポート」をクリックします。
④ プレビュー画面で、「元のファイル」の文字コードを UTF-8 に変えます。
⑤ プレビューで日本語が正しく表示されたら「読み込み」をクリックします。
⑥ 取り込み先のシートとセル（例：A2）を指定してOKします。
プレビュー画面で、正しい文字が見えるかを必ず確認しましょう。
化けたまま読み込んでしまうと、あとから直すのが大変です。カンタンですね。
なお、取り込み画面の見た目はExcelのバージョンで異なるため、ここでは手順を文章で、結果を画像で確認します。

STEP5. 対処② 区切り位置で列を整える

「1列に長い文字列として取り込んでしまった」ときは、区切り位置を使います。
区切り位置は、1つのセルに入った文字を、カンマなどで複数の列に分ける機能です。
まず、分けたいデータが入った列全体（例：A列）を選択します。
次に データ タブ → 区切り位置 をクリックします。
① 「元のデータを区切り文字で分ける」を選び、「次へ」をクリックします。
② 区切り文字で 「カンマ」にチェックを入れ、「次へ」をクリックします。
③ 各列のプレビューを確認し、必要なら「列のデータ形式」を指定して「完了」をクリックします。
これで、1列だったデータが商品コード・氏名・部署の3列に分かれます。
ただし、区切り位置では文字コードは直せません。
文字が化けているときは、先にSTEP4の方法で文字コードを直してから使いましょう。

STEP6. 対処③ VBAで文字コードを指定して開く

毎回同じCSVを取り込むなら、VBAで自動化するのがおすすめです。
Alt+F11でVBAエディターを開き、標準モジュールに次のコードを貼り付けます。

Sub ImportCsvUtf8()
    Dim st As Object, buf As String
    Dim rows As Variant, cols As Variant
    Dim i As Long, j As Long
    Set st = CreateObject("ADODB.Stream")
    st.Type = 2                      ' テキストモード
    st.Charset = "UTF-8"             ' 文字コードを指定（Shift_JISも可）
    st.Open
    st.LoadFromFile ThisWorkbook.Path & "\uriage.csv"
    buf = st.ReadText(-1)            ' 最後まで読み込む
    st.Close
    rows = Split(buf, vbCrLf)
    For i = 0 To UBound(rows)
        If Len(rows(i)) > 0 Then
            cols = Split(rows(i), ",")
            For j = 0 To UBound(cols)
                Cells(i + 1, j + 1).Value = cols(j)
            Next j
        End If
    Next i
End Sub

コードのポイントは、Charsetに文字コードを指定するところです。
“UTF-8” を “Shift_JIS” に変えれば、Shift_JISのCSVも読み込めます。
F5キーで実行すると、文字化けせずにシートへ取り込まれます。
ボタンに登録しておけば、クリック1つで毎回の取り込みが完了します。

タカヒロ

文字化けの犯人（原因）の多くは、開くときの文字コードです。
Excelに「この文字コードで読んでね」と伝えるのがコツで、それが Charset = “UTF-8” の一行です。
一度覚えてしまえば、CSVの取り込みで困らなくなりますよ。

文字化けの直し方の比較

ここまでの直し方を、用途ごとに表にまとめました。
症状に合わせて選ぶと迷いません。

うまくいかないときの対処法（トラブルシュート）

実際に試すと、思ったように直らないこともあるかもしれません。
よくあるつまずきと対処法をまとめました。

文字コードと設定の説明

今回の操作で出てくる、文字コードとVBAの用語の概要です。
それぞれの違いを押さえておきましょう。

文字コード（UTF-8 / Shift_JIS）

UTF-8 ／ Shift_JIS ／ UTF-8（BOMなし）

ADODB.Stream（VBA）

Set st = CreateObject("ADODB.Stream")

Charset プロパティ（VBA）

st.Charset = "UTF-8"

完成

文字化けしていた氏名と部署が、正しい日本語で表示されました。
上の段が元のデータ、下の段が文字コードを指定して取り込んだ結果です。
両方が同じ表示になっていれば成功です。
思ったとおりに動きましたか？
ポイントは、CSVをダブルクリックで開かず、文字コードを指定して取り込むことでした。
一度やり方を覚えれば、次からは落ち着いて対処できます。

さいごに

いかがでしょうか。

今回は、

についてまとめました。

文字化けのほとんどは、UTF-8のCSVをShift_JISとして開いたことが原因です。
まずは文字コードを疑い、「データ→テキストファイル」で開き直してみてください。
区切り位置は列を分ける機能なので、直す順番は「文字コード → 列の分割」です。
まずは今回のサンプル表で、ぜひ一度試してみてください。
また、他にも便利なExcelの時短テクニックがありますので、よろしければご参照頂ければと思います。