nombre entier vba

[Fabien]

Bonjour à tous et bonne année ,

Je voudrais inclure dans une macro un test pour savoir si un nombre est un entier ou ne l'est pas .

connaissez vous le code approprié

merci d'avance

Fabien

 

[Ti]

Function Entier(Byval Nombre#) as Boolean
Entier = Int(Nombre) = Nombre
End Function

 

[fabien]

merci ti