VBA - Input box - userform

Question

This is my code:

qty = InputBox("Please enter the quantity to be added.", "Add Quantity")
Cells(row, 2) = qty
Description = InputBox("Please enter a description.", "Enter Description")
Cells(row, 3) = Description
Unitp = InputBox("Please enter a unit price.", "Enter UnitPrice")
Cells(row, 4) = Unitp
Amount = InputBox("Please enter an amount.", "Enter Amount")
Cells(row, 5) = Amount

Qty & Unitp is getting displayed correctly in Excel. However, when I enter characters in the Description input box then it throws an error. But if I enter no. it goes through but displays as FALSE in the Excel cell. This is the case for both Descripton & Amount.

Can someone help?

How is Description defined?

GSerg
– GSerg

2017-11-24 09:35:49 +00:00
Commented Nov 24, 2017 at 9:35 — GSerg
– GSerg, Commented Nov 24, 2017 at 9:35
Did you write Dim Description As Bool or so?

iBug
– iBug

2017-11-24 09:38:32 +00:00
Commented Nov 24, 2017 at 9:38 — iBug
– iBug, Commented Nov 24, 2017 at 9:38

Xabier · Accepted Answer · 2017-11-24 11:12:03Z

1

You need to Declare your variables for them to take the correct input, put this above your code:

Dim qty as Integer
Dim Unitp as Double
Dim Description as String
Dim Amount as Integer

answered Nov 24, 2017 at 11:12

Xabier

7,7251 gold badge11 silver badges21 bronze badges

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

Comments

JD110588 · Accepted Answer · 2017-12-01 09:52:53Z

0

this issue is resolved. I had declared description for some other variable. Just changed it form Description to Desc & like wise for Amount fields.

Worked just fine.

Thanks for your help guys!

answered Dec 1, 2017 at 9:52

JD110588

1

Collectives™ on Stack Overflow

VBA - Input box - userform

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related