excel中vba使用fix函數的方法

1、首先我們打開一個工作樣表作為例子。

2、使用alt+f11組合快捷鍵進入vbe編輯器，插入一個新的模塊，并在模塊中輸入以下代碼：

Option Explicit

Sub ddt()

Sheet3.Activate

Dim num1 as Integer

Dim num2 as Integer

Dim msg as String

num1 = InputBox("請輸入一個小數")

num2 = InputBox("請輸入一個負數")

msg = "fix取整數為:" & Fix(num1)

MsgBox msg

Sheet3.Range("a1") = msg

msg = "fix取整數為:" & Fix(num2)

Sheet3.Range("a2") = msg

End Sub

3、我們對變量做聲明，這里可以使用最小整數類型的num聲明，另外對msg聲明為文本類型。

4、輸入num1和num2的值，并對其添加提示語內容，num1為小數，num2為負數小數。

5、將值賦予msg變量，在msg變量中我們進行fix（）函數的運算。fix（）函數只有一個參數，就是取整數值。

6、這里需要注意的是fix（）函數和int（）函數雖然同樣是取整，但是int（）函數返回值依循四舍五入運算法則，最后得值是取大的整數，而fix（）函數則是取的小的整數。

相關推薦：

excel2010怎么創(chuàng)建自定義函數?

excel使用vlookup函數計算出現錯誤值怎么辦?

Excel怎么使用MMULT函數返回兩個數組的矩陣乘積?