I have a UserForm with a textbox and I want to take the input value, format
it so two decimal places show at all times. Below is the line of code I am
working with. If I input 100 into the textbox, the value in the cell shows as
100. It doesn't make any difference if it is currency with no $ or a number
with two decimal places.

ActiveCell.Value = Val(Format(Me.txtOrigPrice, "Standard"))

Thank you.