Excel VBA テクニック集
数字を漢数字に置き換える





Excel VBA テクニック集
数字を漢数字に置き換える方法です。これを応用すれば、ローマ数字への変更プログラムなどが作れます。

使い方は、ファイル一覧を使った応用の、「マクロ専用ファイル」によるマクロ実行に、下記コードを入れます。
    Dim Range_Obj As Object

    Set Range_Obj = Excel_App.ActiveSheet.Range("A1:G50")
    Range_Obj.Replace 0, "〇"
    Range_Obj.Replace 1, "一"
    Range_Obj.Replace 2, "二"
    Range_Obj.Replace 3, "三"
    Range_Obj.Replace 4, "四"
    Range_Obj.Replace 5, "五"
    Range_Obj.Replace 6, "六"
    Range_Obj.Replace 7, "七"
    Range_Obj.Replace 8, "八"
    Range_Obj.Replace 9, "九"

「こだわりハウス」写真館| 数学公式集| ピンポイントストリートビュー| FaceBook| Excel Vba テクニック集| Excel 計算式解析・他解析| 富山の建築家| Excel 計算式解析・他解析| 積分の定義・積分の記号の意味の研究|