目次

目的 その一例

目的

  • センチ、インチをポイントに変換したい。
  • VBA の CentimetersToPoints メソッド、InchesToPoints メソッドを使用する。
インチとポイント。1インチ（25.4mm）/72 が 1 ポイント。
インチとポイント。1インチ（25.4mm）/72 が 1 ポイント。

目次まで戻る

その一例

  1. 下記マクロを実行してみます。
    Sub センチをポイントに変換()
      Debug.Print Application.CentimetersToPoints(1)
    End Sub
    1. 実行結果は以下のようになりました。
      1cm は 28.3464566929134 point になるようです。
      1cm は 28.3464566929134 point になるようです。
      2.54cm は 72point になりました。
      2.54cm は 72point になりました。
  2. インチをポイントに変換してみます。 
    Sub インチをポイントに変換()
      Debug.Print Application.InchesToPoints(1)
    End Sub
    1. 実行結果は以下のようになりました。
      1inch は 72point になりました。
      1inch は 72point になりました。
      1/72inch は 1point になりました。
      1/72inch は 1point になりました。

テスト環境

  • Windows 10（64 ビット）
  • Microsoft Office Excel 2003

以上、閲覧ありがとうございました。

目次まで戻る

前後の投稿