cara memperbaiki angka ke 2 tempat desimal di VBA

Sub rounding() 
ActiveCell.Select Selection.Value = Format(ActiveCell, "#.00")
End Sub
Arrogant Ant