【VBA】数値をパーセント形式へ変換する

VBAコード

ここでは例として
　・「0.15」を「15%」へ変換
します。

Option Explicit

Sub sample()
    
    Dim targetNum As Double
    Dim result As String
    
    'パーセント形式へ変換したい数値を指定
    targetNum = 0.15
    
    '数値をパーセント形式へ変換
    result = FormatPercent(Expression:=targetNum, NumDigitsAfterDecimal:=vbFalse)
    
    MsgBox (targetNum & "は" & result & "です！")
    
End Sub

実行結果

数値をパーセント形式へ変換できました。
※「0.15」を「15%」へ変換できました。

参考①

「数値」を「通貨形式」へ変換することもできます。

詳細は以下の記事をご確認ください。

参考②

「数値(数字)」を「漢数字」へ変換することもできます。

詳細は以下の記事をご確認ください。

参考②

上記のVBAコードで使用した以下の詳細は、公式サイトをご確認ください。

●FormatPercent関数