教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について紹介します。

【ExcelVBA 関数】Int関数を使用した小数点以下を切り捨てる方法を教えて!

f:id:m_kbou:20200420124348p:plain

Int関数を使用した小数点以下を切り捨てる方法について説明します。

 

 

構文

記述方法は以下の通りとなります。

Int([数値])

[説明]:

Int関数は小数点以下を含んだ数値に対し、小数部分を切り捨てした整数のみの数値を返します。[数値]には整数に丸めたい数値を記述します。内容を纏めると、「[数値]で指定した数値を小数点以下を切り捨てし、整数に丸めた数値で返して下さい。」との意味になります。

[記述例]:

Int(3.14)

 

使い方

使い方について具体的に説明します。

正の数について小数点以下を切り捨てる場合

正の数について小数点以下を切り捨てる場合について説明します。

[プログラミング例]:

Sub サンプル()
  MsgBox Int(3.14)
End Sub

「数値:3.14について小数点以下を切り捨てし、整数に丸めた値をMsgBoxで表示して下さい。」との意味になります。

f:id:m_kbou:20210428063429p:plain

※上記の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。 

[実行例]:

①<実行>ボタンには上記のプログラミング例のプログラムが登録されています。この<実行>ボタンをクリックします。(※ボタンの作り方やボタンにプログラムを割り当てるにはこちらを参考にして下さい。)

f:id:m_kbou:20210428063443p:plain

②結果は以下の様に表示されます。小数点以下が切り捨てられ、MsgBoxで「3」が表示されます。

f:id:m_kbou:20210428063454p:plain

[サンプル]:

上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。

drive.google.com

正の数について小数点以下を切り捨てる場合についての説明は以上です。

 

負の数について小数点以下を切り捨てる場合

負の数について小数点以下を切り捨てる場合について説明します。

[プログラミング例]:

Sub サンプル()
  MsgBox Int(-3.14)
End Sub

「数値:-3.14について小数点以下を切り捨てし、整数に丸めた値をMsgBoxで表示して下さい。」との意味になります。

f:id:m_kbou:20210428063553p:plain

※上記の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。 

[実行例]:

①<実行>ボタンには上記のプログラミング例のプログラムが登録されています。この<実行>ボタンをクリックします。(※ボタンの作り方やボタンにプログラムを割り当てるにはこちらを参考にして下さい。)

f:id:m_kbou:20210428063605p:plain

②結果は以下の様に表示されます。小数点以下が切り捨てられ、MsgBoxで「-4」が表示されます。(※負の数値を整数で丸める場合、元の数値より小さくなる様に切り捨てます。注意して下さい。)

f:id:m_kbou:20210428063617p:plain

[サンプル]:

上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。

drive.google.com

負の数について小数点以下を切り捨てる場合についての説明は以上です。 

 

プログラミング(サンプル)

プログラミング事例を紹介します。

www.osiete-excelvba.work

 

おわりに

今回はInt関数を使用した小数点以下を切り捨てる方法について説明しました。類似の内容としてFix関数を使用した小数点以下を切り捨てる方法があります。若干内容が違うので、こちらも参考にして下さい。