Las funciones VBA Int y Fix devuelven una parte entera de un número.
Int(número)
Fix(número)
Usando las funciones Int y Fix para convertir diferentes tipos de valores numéricos, lo que también lo ayuda a comprender mejor la diferencia cuando se trata de valores negativos:
Sub IntFixExample()
MsgBox Int(1) 'Devoluciones: 1
MsgBox Fix(1) 'Devoluciones: 1
MsgBox Int(-1) 'Devoluciones: -1
MsgBox Fix(-1) 'Devoluciones: -1
MsgBox Int(2.9) 'Devoluciones: 2
MsgBox Fix(2.9) 'Devoluciones: 2
MsgBox Int(-2.9) 'Devoluciones: -3
MsgBox Fix(-2.9) 'Devoluciones: -2
MsgBox Int(4.5) 'Devoluciones: 4
MsgBox Fix(4.5) 'Devoluciones: 4
MsgBox Int(-4.5) 'Devoluciones: -5
MsgBox Fix(-4.5) 'Devoluciones: -4
MsgBox Int(0.424) 'Devoluciones: 0
MsgBox Fix(0.424) 'Devoluciones: 0
MsgBox Int("13") 'Devoluciones: 13
MsgBox Fix("13") 'Devoluciones: 13
MsgBox Int("-4.5") 'Devoluciones: -5
MsgBox Fix("-4.5") 'Devoluciones: -4
MsgBox Int(True) 'Devoluciones: -1
MsgBox Fix(True) 'Devoluciones: -1
MsgBox Int(False) 'Devoluciones: 0
MsgBox Fix(False) 'Devoluciones: 0
End Sub