Redondeo de decimales

Esto lo puedes hacer con la función round,
Round Function
Description
Returns a number rounded to a specified number of decimal places.
Syntax
Round(expression [,numdecimalplaces])
The Round function syntax has these parts:
Part Description
expression Required.Numeric expression being rounded.
numdecimalplaces Optional. Number indicating how many places to the right of the decimal are included in the rounding. If omitted, integers are returned by the Round function.
Remarks
The following example uses the Round function to round a number to two decimal places:
Dim MyVar, pi
pi = 3.14159
MyVar = Round(pi, 2) 'MyVar contains 3.14.
--------------------------------------------------------------------------------

Con esto anda perfecto:
Dim sa As Double
sa = 0.1235
sa = sa * 1.16
MsgBox sa
'función round te redondea según la cantidad de decimales que querés
sa = Round(sa, 4)
MsgBox sa