Enumeration For Application.InputBox

Question

Whenever I use Application.InputBox() I bring up VBA Help to remind me which Type to use:

Sub MAIN()
    Dim s As String

    s = Application.InputBox(Prompt:="enter data", Type:=2)
End Sub

Does there exist, or can I create an Enumeration for Type so I could code like:

Sub MAIN()
    Dim s As String

    s = Application.InputBox(Prompt:="enter data", Type:=vbString)
End Sub

It would be easier for me to remember an Enumeration rather than an arbitrary integer.

CherryDT · Accepted Answer · 2021-03-17 12:48:01Z

5

No there isn't, but you can just create an enumeration by yourself:

Public Enum InputBoxType
    ibtFormula = 0
    ibtNumber = 1
    ibtText = 2
    ibtBoolean = 4
    ibtRange = 8
    ibtError = 16
    ibtArray = 64
End Enum

edited Mar 17, 2021 at 12:48

answered May 9, 2016 at 13:51

CherryDT

29.4k5 gold badges56 silver badges86 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Automate This Over a year ago

Can also have combinations like this: ibtNumOrText = 1 + 2

CherryDT Over a year ago

Sure but then you would have to add 64 values to the enum for all combinations (ibtFormula appears to be implicitely included because it's zero). It makes much more sense to use ibtNumber + ibtText in the code.

T.M. · Accepted Answer · 2021-03-17 13:31:35Z

0

Using IntelliSense

As the main intention seems to be fastening inputs without consulting extra help, I'd propose to benefit from using IntelliSense:

Simply start input within a code module by

vba.VbVarType.

or in the immediate window by

?vba.VbVarType.

and choose the proposed DropDown values:

Alternatively you could have a look into the Object Browser, too giving a better overview.

answered Mar 17, 2021 at 13:31

T.M.

10k3 gold badges40 silver badges61 bronze badges

Collectives™ on Stack Overflow

Enumeration For Application.InputBox

2 Answers 2

2 Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

2 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related