Excel VBA IF文で

質問

Excel VBAのIF文で質問があります。
「ある数字とある数字を割ってその答えが整数
ならば」
というというふうに記述したいのですが「整数
ならば」というところの書き方がわかりません。

よろしくお願いします。

回答No.1

tommy-pie83 · ベストアンサー

割って答えが整数ならば…

つまり 余りが無いということでいいでしょうか？
それでしたら

最初の数字を A 次の数字を B としたとき

If A mod B = 0 Then

こんな感じですが…

お礼

余りがないということです。
早速のご回答ありがとうございました。

回答No.2

merlionXX

Sub test()
x = 4
y = 2
a = x / y
If a = Int(a) Then
MsgBox "整数"
Else
MsgBox "少数"
End If
End Sub

お礼

早速のご回答ありがとうございました。
希望通りのことができました。