Этот код был создан с помощью Microsoft Library 15.0, но не работает на 14.0 и выделяет слово «Sub»?

Question

Получение сообщения об ошибке с выделением «Sub OptoRun ()», когда пользователь с Microsoft Library 14.0 пытается запустить программу в Excel. Я создал это в 15.0. Я должен изменить это? Как я знаю, что изменить его на?

Sub OptoRun()
'
' OptoRun Macro
'
    ActiveSheet.Unprotect Password:="9061"
'
    SolverOk SetCell:="$AC$1", MaxMinVal:=1, ValueOf:=0, ByChange:="$Q$2:$Q$200", _
        Engine:=2, EngineDesc:="Simplex LP"
    SolverOk SetCell:="$AC$1", MaxMinVal:=1, ValueOf:=0, ByChange:="$Q$2:$Q$200", _
        Engine:=2, EngineDesc:="Simplex LP"
    SolverSolve UserFinish:=True

    Range("priorProjPts").Value = Range("totProjPts").Value - 0.01

    ActiveSheet.Protect Password:="9061"
End Sub