EXCELでCSVを出力すると、Shift-Jisのままになってしまうので、第2水準漢字などが「?」に変換されてしまう。 それを、VBAで対応しようしたのが以下のソース。 かなり重宝するのでメモとして残す。 ちなみに、「EXCEL UNICODe CSV マクロ」で検索して見つけたサイトに記載されていた。 回答した方に拍手!! ------------------- 'Option Explicit Sub CSV_OutputByUnicode() Dim rng As Range Dim i As Long, j As Long Dim Fso As Object Dim f As Object Dim fName As Variant Dim buf As String Dim TxtLine As String Dim objTxt As Object Dim OverWrite
![『EXCELのデータをUnicode(UTF-16)形式のCSVに出力』](https://cdn-ak-scissors.b.st-hatena.com/image/square/e8f91572f7cb56a9e4dd26b23fe05a143ecd2080/height=288;version=1;width=512/https%3A%2F%2Fstat.profile.ameba.jp%2Fprofile_images%2F20180310%2F09%2F72%2Fzt%2Fj%2Fo02000200p_1520642435531_godei.jpg)