VBA não reconhecendo a propriedade MsgBox VbMsgBoxStyle

-1

Estou recebendo a mensagem de erro "Erro de compilação: argumento nomeado não encontrado", quando tento executar meu código do VBA. O VBA não parece reconhecer a última propriedade VbMsgBoxStyle.

Dim dump As VbMsgBoxResult
dump = VBA.Interaction.MsgBox _
       Title:="Invalid Scope!", _
       Prompt:="You entered Invalid Scope !!!", _
       VbMsgBoxStyle:=vbCritical

Por outro lado, meu Pesquisador de objetos mostra isso para MsgBox:

Function MsgBox(Prompt, [Buttons As VbMsgBoxStyle = vbOKOnly], [Title], [HelpFile], [Context]) As VbMsgBoxResult
    Member of VBA.Interaction

Alguém tem uma idéia do porquê isso está acontecendo?

sgp667
fonte

Respostas:

3

A propriedade é Buttons não vbMsgBoxStyle. Seu código deve ser assim:

VBA.Interaction.MsgBox _
            Title:="Invalid Scope!", _
            Prompt:="You entered Invalid Scope !!!", _
            Buttons:=vbCritical
Mr. Mascaro
fonte
Agora me sinto idiota. A resposta foi mesmo na minha tela Obrigado
sgp667