ポイント単位の値に変換（CentimetersToPoints,InchesToPoints）
2015/10/08
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 |
実行結果
関連記事
-
-
VBA で正規表現を使う（RegExp オブジェクト）
RegExp オブジェクト VBA で正規表現を使うには、VBScript のR …
-
-
テキストファイル（UTF-8）を読み込み、書き出し（ADODB.Stream）
Stream オブジェクト ADO（ActiveX Database Objec …
-
-
Join 関数（配列の要素を結合）
Join 関数 1次元配列の各要素を指定した区切り文字で連結します。 【書式】 …
-
-
文字列：文字列を検索してその最初の文字位置を返す（InStr 関数,InStrB 関数）
InStr 関数・InStrB 関数の使い方 【書式】 result = { I …
-
-
色を設定する（QBColor 関数）
QBColor 関数 QBColor 関数は、指定した色番号に対応するRGB コ …
-
-
RGB 値一覧表（XlRgbColor 列挙型）
RGB 値（XlRgbColor 列挙型）一覧表 RGB 関数を使用して、出力さ …
-
-
文字列：定数（改行・タブ）
改行・タブの定数 これらの定数は、使用前に定義する必要はありません。コード中のど …
-
-
引数が省略されたかどうかをチェックする（ IsMissing 関数 ）
IsMissing 関数の使い方 【書式】 result = IsMissing …
-
-
Erase ステートメント（配列の初期化・動的配列のメモリ解放）
Erase ステートメントの使い方 【書式】 Erase myArray [, …
-
-
日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数 ）
DateValue 関数（文字列から日付データを取得） 【書式】 date_va …