NEW ARTICLE
Ubuntuでシステムの起動プロセスを可視化する方法
  1. HOME
  2. vba
  3. VBA Modでの少数の割り算の余り

VBA Modでの少数の割り算の余り

  • 作成日 2022.07.15
  • vba
VBA Modでの少数の割り算の余り

VBAで、Modでの少数の割り算の余りを表示コードを記述してます。

目次

環境

  • OS windows10 64bit

少数の割り算の余り

Modを使用して、少数の割り算の余りの計算を行うと、小数部は銀行型丸めが行われます。

「0.5」を基準に、切り上げて偶数になる場合は切り上げ、ならない場合は切り捨てされます。

【例】

4.5 → 4 (切り捨て)
5.5 → 6 (切り上げ)

実際に適当なボタンを用意して、Modを使用して少数の割り算を計算した結果をセルに表示する
以下のソースコードを記述します。

Private Sub CommandButton1_Click()
    
    Cells(1, 1).Value = 4.4 Mod 3    ' 1  4 ÷ 3
    Cells(2, 1).Value = 4.5 Mod 3    ' 1  4 ÷ 3
    Cells(3, 1).Value = 4.6 Mod 3    ' 2  5 ÷ 3
    
    Cells(4, 1).Value = 5.4 Mod 3    ' 2  5 ÷ 3
    Cells(5, 1).Value = 5.5 Mod 3    ' 0  6 ÷ 3
    Cells(6, 1).Value = 5.6 Mod 3    ' 0  6 ÷ 3

End Sub

実行してみます。

銀行型丸めで小数部が丸められた結果が表示されていることが確認できます。