VBA ne reconnaissant pas la propriété MsgBox VbMsgBoxStyle


-1

Je reçois le message d'erreur «Erreur de compilation: argument nommé introuvable» lorsque j'essaie d'exécuter mon code VBA. VBA ne semble pas reconnaître la dernière propriété VbMsgBoxStyle.

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

D'autre part, mon navigateur d'objets montre ceci pour MsgBox:

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

Quelqu'un at-il une idée pourquoi cela se produit?

Réponses:


3

La propriété n'est Buttonspas vbMsgBoxStyle. Votre code devrait se lire comme ceci:

VBA.Interaction.MsgBox _
            Title:="Invalid Scope!", _
            Prompt:="You entered Invalid Scope !!!", _
            Buttons:=vbCritical

Maintenant je me sens bête. La réponse était même sur mon écran Merci
sgp667
En utilisant notre site, vous reconnaissez avoir lu et compris notre politique liée aux cookies et notre politique de confidentialité.
Licensed under cc by-sa 3.0 with attribution required.