Error macro VB Script para Outlook 2016

Estoy intentando crear una macro en VBScript siguiendo el siguiente tutorial pero me dice error de sintaxis:

http://palel.es/2016/05/13/outlook-contar-los-elementos-seleccionados-rapido-o-con-macro/

Sub ContarElementosSeleccionados()
    Dim objSelection As Outlook.Selection
    Dim Result As Integer
    Set objSelection = Application.ActiveExplorer.Selection
    Result = MsgBox(“Nº de elementos seleccionados: ” & _
                objSelection.Count, vbInformation, “Elementos seleccionados”)
End Sub

¿alguien ve donde esta el error? en el tutorial sale bien, mi Outlook es 2016