至急です。ExcelのVBAで「ボタンを押すと3つのデータの平均値（今回は英国数のテストの点数）を特定のセルに表示し、その点数によって異なるワードを出す」という内容のプログラム（画像下）を作れという課題に対し、画像上のようなプログラムを作ったのですが、なぜか上手くいきません。正しいプログラムを教えてください。

Option Explicit

'

Sub ボタン1_Click()

    Dim Msg As String

'

    [E1] = WorksheetFunction.Average([B1:B3])

'

    If [E1] \u0026gt;= 70 Then

        Msg = \u0026quot;点! よく頑張りました☆\u0026quot;

    ElseIf [E1] \u0026gt;= 50 Then

        Msg = \u0026quot;点! まあまあ頑張りました☆\u0026quot;

    Else

        Msg = \u0026quot;点! とても努力が必要\u0026quot;

    End If

    MsgBox [E1] \u0026amp; Msg

End Sub