CentimetersToPoints メソッド
センチメートル単位の値をポイント単位の値に変換します。戻り値は、倍精度浮動小数点型（Double）の値です。
【書式】
object.CentimetersToPoints ( centimeters )
引数・戻り値
- object ・・・ Application オブジェクト を指定します。
- centimeters ・・・ センチメートル単位の数値（倍精度浮動小数点型：Double）を指定します。省略不可。
InchesToPoints メソッド
インチ単位の値をポイント単位の値に変換します。戻り値は、倍精度浮動小数点型（Double）の値です。
【書式】
object.InchesToPoints ( inches )
引数・戻り値
- object ・・・ Application オブジェクト を指定します。
- inches ・・・ インチ単位の数値（倍精度浮動小数点型：Double）を指定します。省略不可。
CentimetersToPoints メソッド,InchesToPoints メソッド 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
Sub Sample_Point() '「1センチメートル」をポイント単位に変換（Round 関数で小数点以下2桁まで表示） Debug.Print Round(Application.CentimetersToPoints(1), 2) '「0.5インチ」をポイント単位に変換 Debug.Print Application.InchesToPoints(0.5) '「50ポイント」をセンチメートル単位に変換（Round 関数で小数点以下2桁まで表示） Debug.Print Round(100 / Application.CentimetersToPoints(1), 2) End Sub |
実行結果
