[ExcelVBA] Fix関数

>Blog Top Page >[ExcelVBA] Top Page >[ExcelVBA] 関数一覧

■構文
Fix(number)

■説明
指定した数値の整数部を返します。
引数：数値を指定します。

■サンプルコード

view plainprint?

1. Option Explicit  
2.   
3. Sub SampleCode()  
4.     'Fix関数は小数部を除外する。  
5.     Debug.Print Fix(5.5)  '5  
6.     Debug.Print Fix(5)    '5  
7.     Debug.Print Fix(-5.5) '-5  
8.   
9.     '似た関数であるInt関数は、指定した数値を超えない最大の整数を返すことに注意  
10.     '正の数では同じ挙動となります。  
11.     Debug.Print Int(5.5)  '5  
12.     Debug.Print Int(5)    '5  
13.     Debug.Print Int(-5.5) '-6 -5.5を超えない最大の整数なので-6となる  
14. End Sub  

Option Explicit

Sub SampleCode()
    'Fix関数は小数部を除外する。
    Debug.Print Fix(5.5)  '5
    Debug.Print Fix(5)    '5
    Debug.Print Fix(-5.5) '-5

    '似た関数であるInt関数は、指定した数値を超えない最大の整数を返すことに注意
    '正の数では同じ挙動となります。
    Debug.Print Int(5.5)  '5
    Debug.Print Int(5)    '5
    Debug.Print Int(-5.5) '-6 -5.5を超えない最大の整数なので-6となる
End Sub

>Blog Top Page >[ExcelVBA] Top Page >[ExcelVBA] 関数一覧