Как округлить вещественное число до 2 знаков после запятой

[roxy7]

Как получить в таблице в Excel вещественные числа до 2 знаков после запятой после нажатии кнопки "Добавить" для добавления информации в таблицу?
Мой код:

Private Sub CommandButton1_Click()
   Dim Num As Integer
   Dim fio As String * 50
   Dim oc1 As Double
   Dim oc2 As Double
   Dim oc3 As Double
   Dim ns As Double
   ns = Application.WorksheetFunction.CountA(ActiveSheet.Columns(1)) + 1
   Num = Val(TextBox1.Text)
   If Num < 1 Or Num > 100 Then
     MsgBox "Недопустимый номер участника (Допустимые значения 1-100)"
     Exit Sub
   End If
   fio = TextBox2.Text
   oc1 = Val(TextBox3.Text)
   oc2 = Val(TextBox4.Text)
   oc3 = Val(TextBox5.Text)
   If oc3 < 1 Or oc3 > 10 Or oc2 < 1 Or oc2 > 10 Or oc1 < 1 Or oc1 > 10 Then
      MsgBox "Недопустимая номер оценка (Допустимые значения 1-10)"
      Exit Sub
   End If
   With ActiveSheet
        .Cells(ns, 1).Value = Num
        .Cells(ns, 2).Value = fio
        .Cells(ns, 3).Value = oc1
        .Cells(ns, 4).Value = oc2
        .Cells(ns, 5).Value = oc3
        .Cells(ns, 6) = "=C" & ns & "+D" & ns & "+E" & ns
    End With
    TextBox1.Text = ""
    TextBox2.Text = ""
    TextBox3.Text = ""
    TextBox4.Text = ""
    TextBox5.Text = ""
   End Sub

Неверно, если добавлю в код

MsgBox FormatNumber(oc1, 2)

?
Поправляйте, пожалуйста(

[IgorGO]

.Cells(ns, 3).Value = round(oc1,2)
...

[roxy7]

Сообщение от IgorGO

.Cells(ns, 3).Value = round(oc1,2)
...

Спасибо большое!