Salut,
tiens, j'ai testé ça :
Sub test()
Dim sboub As Double
sboub = 11.23456
MsgBox Round(sboub)
End Sub
C'est la fonction Round. Attention, dans ce cas là, le résultat est 11, et non 12.
@++
Mortalino 
Le Mystérieux Chevalier "Provençal, le Gaulois"
N'oubliez pas de lire le règlement