FormatPercent関数は、数値を100倍したパーセント単位の書式に変換し、
パーセント記号(%)を最後につけた文字列を返します。各引数の内容は
FormatCurrency関数とまったく同ものになりますので、そちらを参照して
ください。


  構文　FormatPercent(Expression, NumDigitsAfterDecimal, IncludeLeadingDigit, 
                      UseParensForNegativeNumbers, GroupDigits)

  設定項目　　　               内容
  Expression                   変換の対象となる数値や数式を指定[省略不可]
  NumDigitsAfterDecimal        小数点以下に表示する桁数を指定[省略可能]
  IncludeLeadingDigit          小数点の左側のゼロを表示するかどうか[省略可能]
  UseParensForNegativeNumbers  負の値の場合に値を括弧で囲むかどうか[省略可能]
  GroupDigits                  桁区切りを表示するかどうか[省略可能]


　次のサンプルは、FormatPercent関数の機能はFormat関数の機能に含まれて
いることを示すものです。

●サンプル●

Sub FormatPercentSamp1()

    Dim myStr1 As String, myStr2 As String
    '---Format関数で定義済み数値書式使用
    myStr1 = Format(2.5, "Percent")
    '---FormatNumber関数
    myStr2 = FormatPercent(2.5)
    MsgBox "定義済み数値書式 : " & myStr1 & Chr(13) & _
           "FormatPercent関数 : " & myStr2
End Sub

　Format関数の引数に"Percent"を指定すれば、FormatPercent関数と同じ実行
結果が得られます。